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Abstract 

This  paper  discusses  the  use  of  a  correlation  based  system  to  track  an  object 
through  a  series  of  images  based  on  templates  derived  from  previous  image  frames. 
The  ability  to  track  is  extended  to  sequences  which  include  multiple  objects  of  in¬ 
terest  within  the  field  of  view  of  the  correlator  system.  This  is  accomplished  by 
comparing  the  height  and  shape  of  the  correlation  of  the  template  correlated  with 
itself  to  the  height  and  shape  of  all  peaks  in  the  correlation  of  the  template  with  the 
next  scene.  The  result  is  to  identify  the  region  in  the  next  scene  which  best  matches 
the  shape  and  intensity  of  the  designated  target.  The  use  of  correlation  plane  in¬ 
formation  for  the  designation  of  other  objects  of  interest  within  the  field  of  view 
will  also  be  demonstrated.  This  process  compares  only  the  shape  of  the  template 
correlated  with  itself  to  the  shape  of  all  peaks  in  the  correlation  of  the  template  with 
the  next  scene.  The  result  of  this  process  is  to  identify  all  regions  in  the  next  scene 
which  closely  resemble  the  shape  of  designated  target.  In  addition  to  correlation 
plane  postprocessing,  an  adaptive  window  is  used  to  determine  the  template  size  in 
order  to  reduce  the  effects  of  correlator  walk-off.  Two  image  sequences  were  utilized 
in  the  conduct  of  this  research.  These  sequences,  taken  from  a  Forward  Looking 
Infrared  (FLIR)  sensor  mounted  onboard  a  DC-3  aircraft,  contain  a  T-55  tank  and 
both  an  M-113  and  a  TAB-71  armored  personnel  carrier  moving  in  a  columnized 
formation  along  a  dirt  road.  Results  indicated  that  postprocessing  of  correlation 
plane  information  could  discriminate  between  multiple  targets  in  the  sensors  field 
of  view  (FOV),  and  maintain  a  track  on  the  designated  target.  Postprocessing  of 
correlation  plane  information  also  indicated  that  other  targets  within  the  FOV  could 
be  located. 
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OBJECT  TRACKING  THROUGH  ADAPTIVE  CORRELATION 


/.  Introduction 

The  ability  to  track  an  object  autonomously  in  a  cluttered  environment  with 
several  objects  within  a  sensor’s  field-of-view  (FOV),  has  been  a  goal  of  both  the 
military  and  industry  for  some  time.  While  the  potential  applications  of  such  a 
system  are  unlimited  in  industry,  the  military  is  investigating  a  capability  which 
would  allow  a  warhead  to  track  a  target  with  minimum  human  interaction.  For  the 
purpose  of  this  research,  the  ability  to  track  a  target  is  achieved  when  an  electro¬ 
optic  sensor  system  is  able  to  correctly  determine  the  location  of  a  target  within  its 
FOV  through  time  as  both  the  sensor  and  the  target  are  moving.  In  order  for  such  a 
system  to  be  effective,  the  tracker  must  be  able  to  maintain  lock  on  a  target  despite 
clutter,  a  changing  target  signature,  multiple  targets  within  the  FOV,  and  partial 
obscurations.  The  ability  to  ultimately  identify  the  target,  and  possibly  change  lock 
to  another,  higher  value  target  within  the  FOV  is  also  desired.  Finally,  the  system 
must  be  capable  of  operating  in  real-time  to  be  of  any  military  use.  Although 
many  tracking  systems  have  been  developed  to  date,  none  meet  all  of  these  strict 
requirements  at  all  times. 

1.1  Background 

The  battleground  of  the  future  continues  to  become  more  and  more  complex, 
greatly  increasing  in  complexity  the  demands  placed  on  the  pilots  of  high  perfor¬ 
mance  aircraft  and  helicopters.  One  means  of  reducing  tasks  placed  on  these  pilots 
is  to  develop  a  real-time,  autonomous  tracking  system,  capable  of  locking  onto  tar¬ 
gets  in  a  cluttered,  highly  dynamic  battlefield.  Any  such  tracking  system  must  be 
capable  of  handling  a  large  set  of  potential  targets;  targets  which  may  varj’  in  size, 
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shape,  and  intensity.  To  maintain  low  cost  the  tracking  system  must  be  compatible 
with  current  airborne  sensor  systems  such  as  the  Forward-Looking  Infrared  (FLIR) 
sensor.  Finally,  the  system  must  attain  track  quickly  in  order  to  ensure  timely  de¬ 
liver}'  of  onboard  weapon  systems. 

The  areas  of  autonomous  image  tracking  and  identification  have  been  investi¬ 
gated  rigorously  by  students  at  the  Air  Force  Institute  of  Technology  ( AFIT)  under 
the  direction  of  Dr.  Steven  Rogers.  These  studies  have  examined  many  potential 
methods  and  algorithms  for  achieving  autonomous  image  tracking  (10)  (14). 

One  potential  system  researched  was  the  correlation  based  tracker,  investigated 
by  Capt.  Paul  Law,  GE  91-D,  in  his  thesis  titled  ‘  Correlation  Based  Distortion 
Invariant  Infrared  TVacking”  (10).  Correlation  algorithms  measure  the  similarity 
between  a  target  template  and  the  actual  scene.  To  avoid  the  need  to  store  large 
numbers  of  templates  representing  all  possible  orientations  of  all  possible  targets, 
Capt.  Law  implemented  ah  adaptive  correlator  which  generated  its  template  from 
the  last  frame  of  the  actual  scene.  With  the  adaptive  correlation  algorithm,  Capt. 
Law  was  able  to  maintain  track  of  .i  designated  target  using  real  FLIR  imagery 
which  contained  multiple  possible  targets  and  large  amounts  of  background  clutter. 
Because  correlations  can  be  computed  optically  through  Fourier  Optics  techniques  at 
nearly  the  speed  of  light,  a  real-time  autonomous  tracker  based  on  optical,  adaptive 
correlations  was  projected  as  an  achievable  system. 

1.2  Problem  Definition 

An  autonomous,  real-time  image  tracking  system  which  can  identify  targets 
and  choose  highest  value  targets  among  multiple  targets  in  its  FOV  does  not  cur¬ 
rently  exist.  Any  such  system  must  be  capable  of  correctly  tracking  the  position  of  a 
designated  target  despite  such  problems  as  a  cluttered  FOV,  multiple  targets  within 
its  FOV,  and  changes  in  the  position  and  orientation  of  both  target  and  tracker. 
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Furthermore,  it  must  be  capable  of  identifying  targets  and  choosing  those  with  the 
highest  priority  or  target  value. 

1.3  Scope  and  Limitations 

Much  of  the  recent  work  in  tracking  has  concentrated  on  developing  algorithms 
which  predict  the  possible  locations  of  a  target,  then  choose  the  the  target  out  of  all 
detected  objects  which  best  matches  the  projected  location  (1)  (2)  (3)  (7)  (11)  (16) 
(18).  These  research  efforts  concentrated  on  determining  which  detected  objects 
were  the  targets  being  tracked,  and  not  on  how  to  find  potential  targets.  One 
potential  method  of  finding  and  tracking  targets  at  the  same  time  is  through  a 
correlation  based  tracker.  Southern  Research  Technologies,  Inc.  has  developed  a 
real  time  correlation  based  system  which  tracks  a  designated  target  in  a  cluttered 
environment  (17).  However,  this  system  searches  only  a  small  area  of  the  entire 
scene,  and  multiple  targets  of  similar  shape  and  size  are  not  present  in  the  FOV.. 

This  research  was  a  continuation  of  that  conducted  by  Capt.  Paul  Law  and 
was  intended  to  improve  upon  the  methods  he  developed  while  introducing  some 
new  capabilities.  Capt.  Paul  Law  demonstrated  in  his  thesis  work  that  a  correlation 
based  system  was  capable  of  tracking  a  designated  target  in  a  cluttered,  multi-target 
en\ironment  while  both  the  target  and  the  tracker  were  moving  (10).  The  main  goals 
of  this  research  were  to:  1)  reduce  the  tracking  error  encountered  by  Capt.  Law  in 
his  research  (10),  2)  expand  the  portion  of  scene  used  to  determine  if  other  possible 
targets  are  present,  3)  to  track  multiple  targets  if  present,  and  4)  to  address  the  issue 
of  correlator  ‘^alk-off”  and  identify  solutions  to  reduce  this  effect.  The  ability  to 
identify  all  potential  targets  being  tracked,  and  to  choose  the  highest  value  target 
present  and  change  lock  to  that  target  were  left  open  for  future  research.  To  reduce 
the  amount  of  effort  necessary  to  achieve  these  objectives,  the  following  limitations 
were  imposed. 
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•  The  task  of  target  acquisition  (initially  detecting  and  designating  the  target) 
was  not  addressed.  It  was  assumed  that  initial  target  designation  was  achieved 
manually  by  an  operator,  and  that  the  system  need  only  maintain  track  of  the 
target  once  this  was  accomplished. 

•  Computer  simulations  using  real  FLIR  images  were  conducted  only,  and  thus 
the  system  did  not  operate  in  real-time.  However,  it  was  felt  that  an  optical 
implementation  of  the  system  modeled  would  be  capable  of  functioning  in  real¬ 
time. 

1.4  Methodology 

Along  with  improving  the  performance  achieved  by  Capt.  Law  (10),  this  effort 
focused  on  addressing  the  issue  of  correlator  walk-off,  using  the  information  in  the 
template  auto-correlation  peak,  and  the  capability  to  track  multiple  targets  within 
the  tracker’s  FOV. 

In  research  conducted  by  Tam  (13),  an  accumulated  tracking  error  was  encoun¬ 
tered.  While  the  optical  correlator  used  in  his  research  may  have  introduced  tracking 
nonlinearities  (6)  and  random  noise  (4)  errors,  this  thesis  investigated  “walk-off”  er¬ 
ror  inherent  in  an  adaptive  correlation  based  tracker,  identified  its  sources,  and  tested 
solutions  for  reducing  its  effects. 

In  a  scene  with  multiple  targets  present,  it  is  possible  that  each  target  will  yield 
a  peak  through  the  correlation  process.  Each  of  these  peaks  will  vary  in  amplitude, 
and  some  may  be  larger  than  the  peak  corresponding  to  the  target  being  tracked. 
Therefore,  a  method  of  using  the  information  contained  in  the  shape  of  the  correlation 
peak  (14)  was  introduced.  In  this  method,  the  shape  of  the  correlation  peak  of  the 
template  correlated  with  itself  was  used  to  identify  the  template-scene  correlation 
peak  which  most  closely  resembled  it.  This  peak  was  then  determined  to  be  that 
which  corresponds  to  the  target  being  tracked. 
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Since  Capt.  Law  had  no  means  of  distinguishing  the  correlation  peak  of  the 
target  being  tracked  from  the  peaks  corresponding  to  other  objects  in  the  FOV, 
he  reduced  the  area  of  the  scene  frame  searched  to  exclude  other  possible  targets 
(10).  However,  since  the  method  of  using  correlation  peak  shape  made  it  possible  to 
identify  one  target  from  all  others  within  the  FOV,  it  was  now  possible  to  open  the 
scene  searched  to  include  the  entire  frame.  This  allowed  for  the  tracking  of  all  other 
secondary  targets  within  the  tracker’s  FOV. 

Computer  simulations  for  this  research  were  conducted  on  the  SUN  Sparc  2 
workstations  using  the  KHOROS  image  and  signal  processing  software  developed 
by  the  faculty  and  students  at  the  University  of  New  Mexico  (9).  The  FLIR  images 
used  were  those  utilized  by  Capt.  Law  (10)  which  were  provided  by  the  Model-Based 
Vision  Laboratory,  WL/AARA,  Wright- Patterson  AFB,  Ohio.  These  images  were 
499x320  pixels  in  size  with  256  possible  grey  scale  values  per  pixel.  The  tracking 
algorithms  used  were  modifications  of  the  programs  written  by  Capt.  Law  in  the  C 
programming  language. 

1.5  Overview  of  Thesis 

This  thesis  is  organized  into  five  chapters  and  an  appendix.  The  order  of 
chapters  represents  the  chronological  evolution  of  this  research  effort  from  an  idea 
to  theory',  implementation  to  results,  and  conclusions.  The  appendix  contains  copies 
of  the  C  language  programs  used  to  conduct  the  adaptive  correlation  process. 

This  chapter  introduces  the  thesis  topic,  while  also  presenting  the  scope  and 
methodology  implemented  in  this  research.  Chapter  II  discusses  the  basic  concepts  of 
correlation  and  adaptive  correlation  as  they  relate  to  this  effort.  Chapter  III  describes 
the  evolution  of  and  procedures  used  to  conduct  the  computer  simulations  of  adaptive 
correlation  tracking.  Chapter  IV  discusses  and  analyzes  the  results  obtained  during 
this  research.  Chapter  V  presents  the  research  conclusions  and  discusses  potential 
research  areas  for  future  efforts. 


II.  Basic  Concepts 


In  his  thesis  (10),  Capt.  Paul  Law  provided  a  detailed  review  of  the  concept  of 
correlation,  adaptive  correlations,  their  uses,  and  possible  optical  implementations 
of  a  correlator  system.  Also,  Kumar  (8)  provides  an  over\iew  of  various  optical 
correlator  designs,  including  both  strengths  and  weaknesses  of  each.  This  chapter 
briefly  discusses  the  fundamentals  of  correlation  and  describes  what  is  meant  by 
adaptive  correlations. 

2. 1  Correlation 

Correlation  is  a  mathematical  process  which  measures  the  similarity  between 
two  objects.  The  correlation  of  sCx.y)  and  tCx.y)  when  both  are  real  is 

s(x,y)*t(x,y)  =  /  f  s{a,  p)  t(a  -  X  p  -  y)  da  dp  (1) 

^—00  00 

or 

s(i,y)*t(x,y)  =  (2) 

the  template  is  positioned  at  every  possible  location  in  the  field  of  the  search  scene. 
For  each  possible  location,  the  two  images  are  multiplied,  and  the  value  obtained 
represents  the  similarity,  or  correlation,  of  the  two  images  at  those  locations.  The 
correlation  should  be  large  when  the  two  objects  overlap,  and  small  or  zero  when 
no  overlap  occurs.  When  the  two  objects  are  at  the  location  where  the  best  match 
between  the  two  occurs,  a  peak  in  the  correlation  plane  is  expected. 

There  are,  however,  some  factors  which  affect  the  results  of  a  correlation.  First, 
if  the  object  in  the  search  scene  varies  greatly  in  size,  shape,  or  orientation  from  the 
template,  no  true  correlation  peak  may  occur  and  the  object  in  the  search  scene  may 
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fade  into  the  background  noise.  Abo,  areas  in  the  search  scene  which  have  larger  or 
brighter  values  than  those  of  the  object  to  be  located,  may  produce  larger  correlation 
peaks  than  those  created  by  the  true  object  of  interest.  These  are  factors  which  must 
be  accounted  for  in  any  correlation  based  tracker. 

2.2  Adaptive  Correlation 

Adaptive  correlation  applies  to  the  desire  to  track  an  object  while  the  scene 
and  object  being  tracked  are  changing  with  time.  Since  the  object’s  size,  shape,  and 
orientation  may  be  changing,  the  template  being  used  must  adapt  for  a  correlator  to 
maintain  a  good  track.  This  is  accomplished  by  continually  updating  the  template 
used  in  the  correlation  process.  Each  time  the  target  is  identified  in  the  search  scene, 
the  object  is  extracted  from  that  scene  to  be  used  as  the  template  for  the  next  frame 
of  the  sequence.  Although  little  research  has  been  reported  in  the  area  of  correlation 
post  processing  (8),  analysis  of  the  correlation  plane  information  with  and  without 
energy  normalization  proved  itself  to  be  very  valuable  in  distingubhing  between 
multiple  targets  within  the  sensors  FOV.  As  long  as  the  time  between  frames  is  not 
large  enough  to  allow  extreme  changes  in  size,  shape,  or  orientation  of  the  object 
being  tracked,  this  method  of  adapting  the  template  to  the  current  scene  should 
be  sufficient  to  allow  correlation  based  tracking.  An  example  scene,  template,  and 
correlation  plane  are  shown  in  Figure  1. 

2.3  Summary 

This  chapter  briefly  reviewed  the  basic  concepts  necessary  for  the  conduct  of 
this  thesis.  An  overview  of  correlations  and  the  concept  of  adaptive  correlations  were 
presented,  and  the  reader  is  referred  to  the  thesis  of  Capt.  Law  (10)  for  a  more  in 
depth  discussion  of  these  topics. 

Chapters  III  and  IV  describe  the  methodology  used  and  results  obtained  using 
an  adaptive  correlation  based  system  to  track  real  targets  in  FLIR  generated  imagery. 


Figure  1.  Example  correlation  shown  in  negative,  (a)  scene,  (b)  template,  and  (c) 
correlation  plane 
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III.  Methodology 


This  chapter  discusses  the  methodology  and  approach  taken  for  this  experiment 
in  adaptive  correlation  based  tracking.  In  his  thesis  (10),  Capt.  Law  provided  a 
very  detailed  discussion  of  the  hardware,  software,  images,  and  correlation  method 
used  during  his  research.  A  brief  review  of  this  information  is  given,  followed  by  a 
detailed  presentation  of  the  changes  made  to  expand  and  improve  the  performance 
of  the  correlation  based  tracking  system. 

3.1  Hardware  and  Software 

All  programming  and  simulations  for  this  research  were  conducted  on  Sun 
Sparc  2  workstations.  Each  workstation  operated  at  28  MIPS,  was  equipped  with 
32  MBytes  of  internal  memory,  and  the  stations  were  networked  together  via  thin 
wire  ethemet. 

Programs  written  in  the  C  programming  language  by  Capt.  Law  (10),  were 
modified  for  this  research.  The  programs,  called  TRAC.MEHU .  C  and  TRAC.PRGM .  C  are 
found  in  Appendix  B.l  and  B.2.  These  programs  utilized  routines  of  the  KHOROS 
image  processing  software  (9)  developed  by  the  faculty  and  students  at  the  University 
of  New  Mexico.  While  some  processing  was  done  within  the  C  programs,  their  main 
purpose  was  to  control  the  sequencing  and  flow  of  routines  within  KHOROS  to 
conduct  the  adaptive  correlation  process. 

3.2  FLJR  Images 

Two  FLIR  image  sequences  were  utilized  in  this  research.  These  images  were 
taken  from  a  Helicopter  Fire  Control  System  (HFCS)  FLIR  mounted  on  board  a  DC- 
3  aircraft.  These  sequences  were  taken  at  the  Aberdeen  Proving  Ground,  Maryland, 
between  October  21  and  December  4,  1982,  between  the  times  of  2000  and  2200 
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hours.  The  targets  consisted  of  a  T-55  tank  and  both  an  M-113  and  a  TAB-71 
armored  personnel  carrier  moving  in  a  columnized  formation  along  a  dirt  road. 

In  one  sequence  the  aircraft  flew  toward  the  targets  perpendicular  to  their 
movement  along  the  road,  and  in  the  other  the  aircraft  flew  in  parallel  and  from 
behind  the  formation.  In  both  sequences  the  aircraft  flew  at  approximately  1000 
feet  of  altitude  and  an  operator  electro-mechanically  steered  the  sensor  to  track  the 
targets  from  a  range  of  approximately  10  kilometers  to  1  kilometer  distance.  The 
FLIR  images  were  provided  by  the  Model-Based  Vision  Laboratory  (WL/AARA). 

The  images  provided  were  499x320  pixels  in  size  with  256  gray  scale  values 
available.  These  images  represented  approximately  1  second  between  frames,  or 
approximately  65  meters  of  flight  distance  per  frame.  In  both  sequences  the  targets 
were  warmer  than  the  surrounding  background,  and  thus  had  higher  pixel  values 
than  the  background  data.  This  made  the  targets  distinguishable  by  the  human 
eye  from  a  range  of  approximately  7  kilometers.  In  the  case  where  the  plane  flew 
parallel  to  the  path  of  the  targets,  all  three  targets  appeared  close  together  and 
remained  within  the  sensors  FOV  for  the  entire  sequence.  However,  true  target 
location  information  was  only  available  down  to  2200  meters  for  Target  3.  Therefore, 
all  tracking  information  gathered  on  Target  3  for  this  sequence  ended  at  this  range. 
In  the  case  where  the  aircraft  flew  perpendicular  to  the  three  targets,  the  separation 
between  the  vehicles  made  it  impossible  to  keep  all  three  within  the  sensors  FOV 
throughout  the  sequence.  At  approximately  2700  meters  one  target  exited  the  field  of 
view,  while  another  exited  the  FOV  at  approximately  1900  meters.  The  final  target, 
the  M-113  armored  personnel  carrier,  remained  in  the  FOV  for  the  entire  sequence. 
Example  frames  from  Sequence  1  are  shown  in  Figure  2  and  from  Sequence  2  in 
Figure  3. 

For  both  sequences,  information  about  the  true  target  locations  for  all  targets 
was  provided  by  the  personnel  at  the  MBV  Laboratory  for  frames  between  the  ranges 
of  8  to  1  kilometers.  This  data  was  obtained  by  analyzing  each  frame  and  finding  the 
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Figure  2.  Sample  frames  from  Sequence  1  shown  in  negative.  Images  represent 
ranges  from  8  km  (a)  to  1  km  (h). 
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Figure  3. 


Sample  frames  from  Sequence  2  shown  in  negative.  Images  represent 
ranges  from  8  km  (a)  to  1  km  (h). 
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bounding  box  which  encompassed  each  target  entirely.  The  center  of  each  box  was 
considered  to  be  the  center  of  the  target.  This  information  was  used  to  determine 
the  error  in  numbers  of  pixels  that  the  correlation  based  tracker  achieved  for  each 
frame.  -  ■  '  ■  -  '  * 

S.S  Correlation  Ptoccss  •  . 

<  ■  *  •  •  .  ‘ 

The  adaptive  correlation  process  as  implemented  by  the  C  language  programs 
was  discussed  in  full  detml  in  Capt.  Law’s  thesis  (10),  and  a  brief,  less  detailed 
overview  is  given  in  this  section.  This  process  remained  unchanged  during  this 
research  except  as  noted  in  later  sections  of  this  chapter. 

The  process  began  by  loading  the  previous  and  current  frames  of  the  sequence. 
Both  images  were  then  preprocessed  based  on  the  operator’s  selection  of  built  in  op¬ 
tions.  The  template  was  then  removed  from  the  previous  frame,  and  the  search  scene 
was  extracted  from  the  current  scene,  with  their  sizes  dependent  on  the  operator’s 
selected  options.  The  two  images  were  then  correlated,  and  the  resulting  peak  in  the 
correlation  plane  was  chosen  as  the  location  of  the  target.  This  location  was  then 
used  as  the  center  for  the  extraction  of  the  template  to  be  used  for  the  next  frame. 
This  process  repeated  itself  and  continued  through  the  entire  sequence  of  images. 

For  the  size  of  the  template  and  the  search  scene,  the  operator  had  three  options 
in  the  original  version  of  the  program  (10).  The  sizes  were:  small  (template  30x20, 
scene  60x38),  medium  (template  42x28,  scene  116x72),  and  large  (template  64x40, 
scene  192x120).  These  sizes  were  fixed  throughout  the  correlation  process.  During 
this  research  two  new  options  were  added.  For  both,  the  template  became  adaptive. 
That  is,  the  program  tried  to  determine  the  exact  size  of  the  target,  and  make  the 
window  for  the  template  that  same  size.  In  one  case,  the  scene  was  60x38,  the  same 
as  the  original  small  scene,  and  in  the  other  case,  the  search  scene  became  the  entire 
499x320  frame.  During  this  research,  only  the  two  new  options  were  utilized  to 
compare  the  results  obtained  to  those  obtained  by  Capt.  Law  (10). 
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The  programs  also  contained  many  possibilities  for  image  preprocessing.  Ex¬ 
amples  of  these, options  included:  none,  threshold  binarization,  threshold  binariza- 
tion  with  gray  scale  restored,  image  blending,  and  other  combinations.  An  option  to 

use  M  edge  extractor  (9)  after  implementing  any  of  the  previous  options  was  added 

,  , - - ,  - 

during  this  research.  Sample  images  are  shown  in  Figure  4. 


.  Figure  4.  Example  image  before  and  after  edge  extraction  (9)  shown  in  negative, 
(a)  original  image,  (b)  image  after  edge  extraction. 


Under  the  option  of  threshold  binarization,  three  possibilities  were  imple- 

.  • 

I  jmented.  These  are:  scene  average  thresholding,  line-by-line  thresholding,  and  Cline 

:  ^thresholding.  Scene  average  thresholding  set  to  0  all  pixels  in  the  scene  that  had 

‘  values  less  than  the  scene  average  plus  an  operator  set  percentage,  while  setting  all 
*  * 

}  pixels  above  that  value  to  1.  Line-by-line  thresholding  utilized  the  average  of  the 
i  -eight  previous  pixels  plus  an  operator  set  percentage  to  determine  if  a  pixel  was 
set  to  0  or  1.  Cline  thresholding  made  its  decision  based  on  the  average  plus  an 
operator  set  percentage  of  the  eight  pixels  surrounding  the  pixel  of  interest.  Based 
on  the  results  obtained  by  Capt.  Law  (10),  an  operator  set  percentage  of  15%  was 
always  chosen  when  a  binarization  technique  was  utilized.  Once  binarization  had 
taken  place,  grey-scale  was  restored  if  the  operator  desired.  This  was  accomplished 
by  multiplying  pixel- by-pixel  the  binarized  image  with  the  original  image.  There¬ 
fore,  all  pixels  set  to  zero  through  binarization  remained  zero,  while  all  pixels  set 
to  one  through  binarization  were  restored  to  their  original  grey-scale  values.  A  flow 
diagram  of  the  final  program  is  shown  in  Figure  5. 
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During  this  research  effort,  only  the  following  options  were  used:  no  image  pre- 
proc^lng,  no  binarization  with  edge  extractor,  and  scene  average,  line>by-line,  and 
Cline  thresholding  all  with  gray  scale  restored.  The  three  binarization  techniques 
were  all  implemented  to  determine  which  worked  best  with  the  adaptive  template, 
and  which  generated  the  lowest  average  tracking  error.  Then,  the  best  binarization 
'^technique  was  compared  to  no  preprocessing,  and  no  binarization  with  edge  extrac¬ 
tion  to  determine  which  image  preprocessing  technique  provided  the  best  overall 
tracking  performance. 

3.4  Walk-off  and  Error  Reduction 

Whenever  the  object  of  interest  is  changing  its  size,  shape,  or  orientation  from 
frame  to  frame  of  a  sequence,  correlator  walk-off  will  occur.  When  the  template  does 
not  exactly  match  the  target  in  the  search  scene,  the  point  where  the  template  best 
matches  the  target  may  not  correspond  with  the  center  of  the  target.  This  produces 
an  error  in  the  correlation.  Although  this  error  is  a  random  error,  it  will  continue 
to  add  to  itself  from  frame  to  frame  due  to  the  nature  of  the  correlation  process. 
Given  enough  frames,  this  error  may  eventually  accumulate  to  such  a  point  that  it 
”walks-off”  from  the  target  (13). 

Also,  it  was  found  in  Capt.  Law’s  research  (10),  that  the  larger  the  template 
was,  the  more  error  that  was  introduced  into  the  correlation.  This  was  due  to 
the  background  pixels  which  were  a  part  of  the  template  when  the  template  was 
much  larger  than  the  target.  Just  as  varia  10ns  in  the  target  from  frame  to  frame 
introduced  error,  so  did  the  background  pixels.  By  eliminating  as  much  of  the 
background  information  from  the  target  as  possible,  the  error  from  frame  to  frame 
could  be  reduced. 

The  solution  to  both  of  these  problems  became  an  adaptive  window  for  creating 
the  template.  A  windowing  algorithm  that  found  the  edges  of  the  target  offered 
several  advantages.  First,  the  target  location  as  determined  through  correlation  was 
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assumed  to  be  a  pixel  in  the  area  of  the  target,  but  not  necessarily  the  center  of 
the  target.  After  the  target  had  then  been  windowed  by  a  bounding  box,  the  center 
of  that  bounding  box  was  considered  to  be  the  true  center  of  the  target.  By  doing 
this,  the  system  compensated  for  the  walk-off  error  encountered  from  frame  to  frame, 
and  reduced  the  effects  of  its  accumulation.  At  the  same  time,  the  adaptive  window 
reduced  the  error  encountered  each  time  by  setting  the  size  of  the  template  to  the 
size  of  the  target  and  thus  removed  excess  background  pixels  which  had  an  impact 
on  the  correlation  process. 

An  added  benefit  from  an  adaptive  template  was  in  the  area  of  target  desig¬ 
nation.  Without  the  adaptive  template,  if  the  original  pixel  location  for  the  target 
as  designated  by  the  operator  was  not  the  true  center  of  that  target,  error  was  in¬ 
troduced  into  the  system.  Capt  Law’s  solution  (10)  was  to  allow  the  operator  to 
select  the  true  center  of  the  target  as  a  starting  point  because  this  information  was 
available  to  him.  Although  this  allowed  him  to  begin  the  tracking  process  without 
an  operator  introduced  error,  it  did  not  represent  the  real  world  where  a  target  des¬ 
ignator  does  not  know  the  exact  center  location  of  the  target.  However,  the  adaptive 
template  option  did  allow  the  operator  to  designate  any  pixel  of  the  target  as  a  start¬ 
ing  location,  and  by  bounding  the  target  to  select  the  template,  operator  introduced 
error  was  reduced  if  not  eliminated. 

3.5  Adaptive  Template 

The  algorithm  developed  to  perform  the  adaptive  windowing  was  based  on 
previous  knowledge  of  the  content  of  the  sequences.  Its  intent  w’as  to  validate  the 
concept  and  performance  improvements  that  could  be  attained  by  having  an  adaptive 
template,  not  to  validate  the  algorithm  developed.  Development  of  a  true  adaptive 
template  algorithm  which  would  work  for  a  variety  of  situations  was  left  as  a  topic 
for  future  reseairch. 
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Two  pieces  of  prior  knowledge  allowed  the  algorithm  developed  in  this  research 
to  work.  First  was  that  most  of  the  background  pixels  had  values  below  70.  Second 
was  that  all  of  the  targets  were  brighter  than  the  background,  and  that  the  majority 
of  the  target  pixels  had  values  greater  than  70.  By  utilizing  this  information,  an 
adaptive  template  algorithm  was  developed. 

;  The  algorithm  began  by  checking  the  location  of  the  correlation  peak  to  see  if 
the  pixel  value  in  the  current  scene  at  that  location  was  greater  than  70.  If  it  was, 
the  algorithm  assumed  that  it  was  part  of  the  target.  If  not,  it  assumed  the  pixel  was 
near  the  target  and  began  an  outward  search  for  the  target.  This  search  included 
checking  outward  in  all  directions  from  the  current  location  until  the  nearest  pixel 
with  a  value  greater  than  70  was  found.  This  pixel  was  then  considered  to  be  part 
of  the  target. 

Once  a  pixel  was  determined  to  be  part  of  target,  a  3x3  box  was  drawn  around 
it.  Each  side  of  the  box  was  then  checked  to  see  if  95*/,  of  its  pixels  had  values  less 
than  70.  If  all  sides  of  the  box  had  95%  of  their  pixels  less  than  70,  the  windowing 
would  be  complete  and  the  size  of  the  template  determined.  If  not,  each  side  of  the 
box  that  did  not  meet  the  95*/.  criteria  was  pushed  out  from  the  starting  location 
of  the  window.  This  increased  the  size  of  the  window,  but  only  expanded  it  in  the 
directions  of  the  edges  of  the  target  from  the  starting  location.  Again  all  four  sides 
were  then  checked  to  see  if  they  met  the  95*/,  criteria.  Expansion  of  the  window 
continued  until  all  four  sides  met  the  specified  criteria.  At  that  point,  the  window 
matched  the  actual  size  of  the  designated  target,  and  the  center  of  the  window 
was  then  considered  to  be  the  true  center  of  the  target.  The  size  of  the  template 
utilized  for  the  next  frame  was  also  set  to  the  size  of  the  adaptive  window.  Figure  6 
provides  an  example  of  the  process.  This  figure  demonstrates  the  whole  process  of 
starting  with  a  pixel  off  of  the  intended  target,  to  finding  the  nearest  target  pixel,  to 
expanding  the  window  until  all  sides  meet  the  95'/,  criteria.  Figure  7  shows  examples 
of  adaptive  templates  tzdcen  with  various  preprocessing  options. 
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Figure  7.  Sample  templates  from  (a-c)  Sequence  2  and  (d-f)  Sequence  1  shown  in 
negative.  (a,d)  show  edge  extraction,  (b,e)  represent  no  image  prepro¬ 
cessing,  and  (c,f)  represent  scene  averaging  with  grey-scale  restored. 

3.6  Distinguishing  Between  Multiple  Targets 

In  his  research  (10),  Capt.  Law  restricted  the  search  scene  for  each  frame  to 
a  subimage  of  the  full  frame.  The  size  of  the  subimage  was  based  on  the  option 
of  small,  medium,  or  large  selected  by  the  operator.  His  research  found  that  the 
smaller  the  search  scene,  the  better  the  performance  of  the  system.  The  reason  the 
system  worked  better  with  a  small  search  scene  was  because  it  reduced  the  number 
of  targets  in  the  search  scene.  As  mentioned  in  Chapter  2,  when  multiple  targets 
of  differing  brightness  are  in  the  search  scene,  problems  may  be  encountered  when 
trying  to  track  a  target  which  is  not  the  brightest.  This  problem  occurred  because 
the  brightness  of  pixels  can  outweigh  the  match  in  shape  in  the  correlation  process, 
resulting  in  the  highest  correlation  peak  on  the  brightest  target.  This  caused  the 
correlator  to  shift  its  track  from  the  designated  target  to  the  brightest  target  in  the 
FOV. 

The  shift  in  tracking  to  the  brightest  target  produced  a  problem  in  how  to 
maintain  track  on  targets  which  are  not  the  brightest  target  in  the  FOV.  Analysis  of 
the  correlation  plane  showed  that  although  the  brightest  target  produced  the  largest 
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peak,  otber,  smaller  peaks  did  exist  at  the  locations  of  the  other  targets  and  at 
many  locations  in  the  background.  Therefore,  the  problem  became  how  to  identify 
the  proper  peak  in  the  correlation  plane,  not  just  the  tallest  peak.  Postprocessing  of 
the  correlation  plane  information  yielded  promise  in  solving  this  problem.  However, 
little  has  been  reported  in  the  area  of  correlation  postprocessing  (8).  The  research 
that  has  been  reported  (12)  (14)  (15)  has  all  dealt  with  identifying  a  target  that 
has  been  scaled  or  rotated,  and  not  in  distinguishing  between  multiple  targets  of  the 
same  shape. 

3.6.1  Template  Autocorrelation  When  the  amount  of  time  between  frames  in 
a  sequence  is  small  enough  that  the  objects  being  tracked  do  not  change  much  in 
size,  shape,  or  orientation,  then  the  template  holds  more  information  than  the  shape 
and  brightness  of  the  target.  Since  the  target  in  the  current  scene  was  expected  to 
look  similar  to  the  object  in  the  template,  then  the  size  and  shape  of  the  template 
conelated  with  the  target  was  expected  to  look  similar  to  the  size  and  shape  of  the 
template  correlated  with  itself.  Taking  advantage  of  this  information  became  the 
focus  of  the  rest  of  this  research  effort. 

However,  it  should  be  noted  that  the  template  autocorrelation  utilized  was  not 
a  true  autocorrelation.  If  the  template  had  only  been  correlated  with  itself,  then 
as  soon  as  the  template  was  shifted  off  center,  the  energy  in  the  correlation  plane 
would  drop  dramatically.  This  would  not  be  representative  of  what  happened  when 
the  template  was  correlated  with  the  scene  because  the  background  surrounding  the 
target  was  not  being  considered  in  the  shape  of  the  correlation  peak.  Therefore,  two 
templates  were  extracted.  The  first  template  was  the  true  template  which  was  to  be 
correlated  with  the  next  scene.  The  second  template  was  a  copy  of  the  first  template, 
only  expanded  an  additional  three  pixels  in  each  direction.  When  it  came  time 
for  template  autocorrelation,  the  true  template  was  correlated  with  the  expanded 
template.  This  allowed  the  background  surrounding  the  template  to  influence  the 
correlation  plane  information.  The  resulting  correlation  plane  peak’s  height  and 
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shape  were  then  more  representative  of  what  was  expected  when  the  true  template 
was  correlated  with  the  next  scene. 

3.6.2  Correlation  Peak  Identification  In  his  thesis  (14),  IVoxel  investigated 
the  use  of  correlation  information  for  pattern  recognition  of  targets.  Because  he 
experienced  some  success  with  his  process,  the  methods  utilized  by  IVoxel  became 
the  starting  point  in  this  research  for  identifying  the  proper  peak  in  the  correlation 
plane. 

The  method  (14)  began  by  extracting  the  7x7  window  of  pixels  around  the  peak 
of  the  autocorrelation  plane.  Each  pixel  was  then  normalized  by  dividing  it  by  the 
square  root  of  the  sum  of  the  squares  of  each  point  in  the  7x7  window.  The  data  was 
considered  to  be  a  vector  in  49  dimensional  space,  and  Lt.  TVoxel  then  used  a  distance 
measurement  to  try  to  determine  the  identity  of  the  target.  Based  on  this  method, 
a  7x7  window  was  extracted  around  each  peak  in  the  correlation  of  the  template 
with  seeirch  scene.  Each  window  was  normalized  in  the  manner  described,  and  the 
Euclidean  distance  between  that  peak  and  the  peak  of  the  template  autocorrelation 
was  measured.  Euclidean  distance  was  based  on 

/  49  \  j 

c=  (3) 

and  the  peak  with  the  smallest  Euclidean  distance  from  the  template  autocorrelation 
was  considered  to  be  the  location  of  the  designated  target. 

This  method  was  tested,  but  did  not  perform  correctly.  At  some  point  in  each 
sequence  for  every  target,  the  system  still  switched  from  the  target  of  interest  to  one 
of  the  other  targets.  The  reason  for  this  was  that  the  normalization  process  removed 
target  brightness  information,  and  therefore,  the  comparison  was  being  based  only 
on  the  shape  of  the  object  in  the  search  scene.  Because  there  were  some  changes  in 
size,  shape,  or  orientation  in  the  designated  target  from  frame  to  frame,  situations 
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were  being  created  where  the  appearance  of  a  target  in  the  past  scene  looked  more 
like  another  target  than  itself  in  the  current  scene. 

To  introduce  the  brightness  of  the  target  as  a  factor  in  peak  analysis,  the  nor¬ 
malization  of  the  7x7  pixel  array  was  removed  from  the  process.  However,  when  the 
unmodified  7x7  windows  were  used  for  comparison,  error  were  still  encountered  in 
the  tracking  process.  These  errors  did  not  shift  to  other  targets  often,  but  instead 
were  shifting  to  areas  in  the  background  pixels.  This  was  a  step  in  the  proper  di¬ 
rection  because  the  system  was  distinguishing  between  targets,  but  the  system  still 
needed  refining.  Areas  in  the  noise  that  were  relatively  fiat  were  encountering  small 
distances  between  the  outer  pixels  of  the  7x7  window,  but  were  not  matching  well 
near  the  peak.  But  the  match  at  the  outer  pixels  was  outweighing  the  mismatch 
near  the  peak  and  these  areas  were  yielding  smaller  distances  than  the  actual  peak 
of  interest.  A  conceptual,  2-dimensional  example  of  what  was  encountered  is  shown 
in  Figure  8.  In  this  figure,  (a)  represents  the  template  autocorrelation,  (b)  repre¬ 
sents  the  matching  of  (a)  with  the  template-target  correlation,  and  (c)  represents 
the  matching  of  (a)  with  template-noise  correlation.  It  can  be  seen  from  Figure  8 
that  even  though  the  tempi  ate- target  correlation  matched  the  shape  of  the  template 
autocorrelation  better  than  the  template-noise  correlation,  the  template-noise  corre¬ 
lation  would  yield  a  smaller  distance  from  the  template  autocorrelation  than  would 
the  tempi  ate- target  correlation.  This  would  cause  the  tracker  to  begin  tracking  on 
background  noise. 

The  next  step  was  to  place  weighting  factors  on  the  distances  between  individ¬ 
ual  pixels  so  that  matching  near  the  peak  was  more  important  than  matching  near 
the  edges  of  the  7x7  window.  This  yielded  the  weighted  Euclidean  distance  metric 

/  49  \  J 
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(a) 


Figure  8.  Correlation  peak  matching,  (a)  template  autocorrelation,  (b)  compari¬ 
son  with  template-target  correlation,  (c)  comparison  with  template-noise 
correlation 


where  w,  is  the  weighting  factor.  The  weighting  factors  were  chosen  to  stress  the 
number  of  rows  and  columns  of  offset  that  each  pixel  in  the  7x7  window  represented 
in  the  correlation  plane.  In  Figure  9  below,  the  total  number  of  rows  and  columns  of 
offset  for  each  pixel  in  the  window  is  shown,  with  the  center  pixel  representing  zero 

t 

or  perfect  match  of  the  data. 


Figure  9.  Correlation  offset  versus  pixel  location. 

Based  on  this,  it  was  decided  that  pixels  representing  equal  amounts  of  offset 
should  be  weighted  equally.  It  was  also  chosen  that  each  step  closer  to  zero  offset 
should  be  weighted  twice  the  amount  of  one  more  offset.  This  yielded  the  set  of 
weight  factors  in  Figure  10.  This  set  of  weighting  factors  was  tested,  and  still  errors 
existed. 

Analysis  of  the  points  which  caused  errors  showed  that  the  most  important 
pixel  in  identifying  the  proper  peak  should  be  the  height  of  the  peak  or  center  pixel 
itself.  However,  a  look  at  the  above  weighting  factors  shows  that  the  outer  ring, 
representing  the  most  offset,  has  a  combined  weighting  of  84.  The  next  ring  has  a 
combined  weighting  of  144,  the  third  ring  has  a  weight  192,  and  the  peak  has  only  a 
weighting  of  64.  Therefore,  although  the  center  pixel  had  the  greatest  weighting,  it 
was  still  not  as  important  to  the  total  distance  as  the  outermost  ring.  This  created 
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the  problem  that  the  height  of  the  peak  was  still  not  as  important  as  the  shape  of 
the  peak. 

Finally,  a  weighting  method  which  emphasized  the  height  as  much  as  the  shape 
was  introduced.  The  idea  was  to  make  the  center  weight  slightly  greater  than  the 
combined  weighting  of  the  rest  of  the  pixels.  This  yielded  the  weighting  system  in 
Figure  11. 
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Figure  10.  Pixel  weight  factors,  Set  1. 
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Figure  11.  Pixel  weight  factors,  Set  2. 

As  will  be  shown  in  Chapter  4,  this  weighting  system  was  quite  effective.  Some 
errors  were  still  encountered  which  leaves  open  the  reevaluation  of  the  weighting 
factors  for  future  research.  Most  of  the  errors  were  due  to  the  fact  that  no  point 


had  a  very  good  match  to  the  template  autocorrelation  peak.  Because  of  this,  the 
first  fallback  measure  was  introduced.  When  the  distances  measured  for  good  tracks 
were  evaluated,  they  all  seemed  to  fall  under  certain  value.  Therefore,  this  value 
was  multiplied  by  10,  and  if  no  distances  were  measured  less  than  that  value,  then 
the  program  assumed  it  had  not  found  the  target,  and  chose  the  targets  last  known 
location  as  its  current  location.  This  compensated  for  all  of  the  errors  encountered 
that  were  not  corrected  by  the  final  fallback  measure  discussed  in  the  next  section. 
This  allowed  the  system  to  continue  tracking  the  proper  target  in  all  cases. 

To  validate  this  concept  of  a  correlation  postprocessing  algorithm,  several  im¬ 
ages  not  from  the  two  sequences  were  chosen  to  see  if  the  algorithm  could  find  the 
designated  target.  In  each  case,  the  location  of  the  target,  as  well  as  the  box  en¬ 
compassing  the  target,  were  given.  The  box  encompassing  the  target  was  used  as 
the  true  template,  and  all  template  autocorrelations  and  template-scene  correlations 
were  performed  within  Khoros  (9),  and  the  correlation  plane  information  was  stored 
in  files.  The  postprocessing  algorithm  was  then  implemented  in  a  small  C  language 
program  called  COR.C  (see  Appendix  B.3),  which  read  in  the  correlation  files  and 
processed  them  to  determine  the  location  of  the  target. 

The  images  used  to  validate  this  dgorithm,  along  with  the  templates  extracted, 
are  shown  in  Figures  12,  13,  and  14.  These  images  include  airplanes,  trucks,  and 
tanks  as  the  target  of  interest.  In  the  images  which  have  airplanes  or  trucks,  the 
target  were  brighter  than  the  background,  and  thus  a  peak  was  expected  at  their 
location  in  the  correlation  plane.  In  the  case  of  the  images  which  had  a  tank  as 
the  target,  the  tank  was  not  brighter  than  the  background.  Therefore,  no  peak  in 
the  correlation  plane  was  expected.  However,  the  height  and  shape  of  the  template 
autocorrelation  still  could  be  used  to  tiy  and  locate  the  target  within  the  scene.  In  all 
cases,  the  correlation  plane  postprocessing  algorithm  determined  the  exact  location 
of  the  designated  target. 


27 


I  J 


Figure  12.  Images  and  associated  templates  containing  an  airplane  used  to  validate 
the  correlation  plane  postprocessing  algorithm. 


(a) 


(b) 


Figure  13.  Images  and  associated  templates  containing  a  truck  used  to  validate  the 
correlation  plane  postprocessing  algorithm. 
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5.7  Tracking  Other  Targets 

An  area  of  particular  interest  in  this  research  was  the  ability  to  properly  locate 
and  track  the  locations  of  other  targets  in  the  search  scene.  The  motivation  for  this 
ability  was  for  the  system  to  be  capable  of  identifying,  through  pattern  recognition, 
the  target  being  tracked  plus  all  other  potential  targets  within  the  sensor’s  FOV.  The 
system  could  then  distinguish  between  high  and  low  priority  targets,  and  eventually 
change  track  to  the  highest  priority  target  found.  Although  the  ability  to  identify 
other  targets  and  change  track  to  a  higher  priority  target  was  not  investigated  in 
this  research,  the  ability  to  locate  other  targets  in  the  search  scene  was  investigated. 
Because  the  method  of  pattern  recognition  developed  by  Lt.  Troxel  (14)  was  very 
effective  in  identifying  shapes  without  reference  to  object  brightness,  it  was  utilized 
as  a  means  of  identifying  other  potential  targets  in  the  search  scene. 

The  search  for  other  targets  was  conducted  within  the  algorithm  at  the  same 
time  as  the  search  for  the  actual  target  of  interest.  As  described  earlier,  a  7x7 
window  of  correlation  information  was  extracted  around  each  peak,  the  pixel  values 
were  normalized,  and  the  distance  from  the  7x7  window  of  information  generated 
by  the  autocorrelation  of  the  template  was  determined.  The  algorithm  stored  the 
locations  of  the  ten  best  matches  within  the  search  scene.  These  locations  were 
then  compared  to  the  10  best  matched  locations  found  in  the  previous  scene.  If  any 
location  from  the  search  scene  was  within  20  pixels  (a  large  amount  of  movement 
from  frame  to  frame)  of  a  stored  location  from  the  previous  scene,  the  algorithm 
considered  that  location  to  represent  a  potential  target.  These  locations  were  stored 
in  a  file  by  the  program,  and  were  later  compared  to  the  known  locations  of  the  other 
targets  in  the  sequences  to  determine  if  the  method  of  target  location  identification 
was  successful. 

Based  on  the  relative  success  of  this  algorithm,  the  final  fallback  measure  was 
introduced.  Once  the  program  had  located  the  target  and  the  ten  potential  target 
locations  in  the  search  scene,  a  comparison  was  conducted  to  determine  if  any  of  the 
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potential  target  locations  were  closer  to  the  last  known  loca.tion  of  the  target  being 
tracked  than  the  location  as  determined  by  the  tracker.  Because  the  time  between 
frames  did  not  allow  for  significant  changes  in  object  position,  a  potential  target 
located  closer  to  the  last  known  location  of  the  target  was  assumed  to  be  the  real 
target  of  interest.  This  fallback  measure  was  effective  in  removing  most  of  the  errors 
encountered  by  the  adaptive  correlation  tracker. 

S.8  Correlation  Information 

During  the  execution  of  C  language  programs,  several  important  pieces  of 
information  were  stored  in  files.  In  total,  four  files  of  information  were  created 
during  each  run  of  the  program.  One  file  contained  the  range  and  locations  of  other 
potential  targets  as  found  in  the  method  described  in  the  previous  section.  Another 
file  was  generated  containing  range  and  pixel  error  information  only.  This  file  proved 
valuable  in  generating  the  plots  found  in  Chapter  IV  of  this  thesis.  The  third  file 
contained  range  versus  target  location  data. 

The  fourth  file  created  was  the  main  information  file.  This  file  contained 
the  range  of  each  frame,  the  location  of  the  target  as  determined  by  the  adaptive 
correlation  tracker,  and  the  actual  location  of  target  as  determined  by  the  MBV 
Laboratory.  Also  included  in  this  file  was  the  pixel  error  as  determined  by 

Error  —  {,^peak  “I"  {yptak  ~  J/true)  (5) 

and  the  error  direction.  Error  direction  was  given  in  degrees  amd  was  measured 
from  the  horizontal.  Values  ranged  from  0  to  180  degrees,  and  0  to  -180  degrees. 
Finally,  the  distance  between  the  template  and  scene  correlation  and  the  template 
autocorrelation  was  saved.  This  value  was  normalized  by  the  height  of  the  template 
autocorrelation  peak  to  allow  for  smaller  values  and  to  allow  comparisons  from  frame 
to  frame.  In  the  cases  where  correlation  peak  location  only  was  used  to  determine 
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target  location,  this  measurement  was  saved  with  a  value  of  zero.  This  measurement 
was  also  used  to  indicate  when  the  program  had  relied  on  a  fallback  measure  to 
maintain  proper  track.  In  the  case  where  a  location  identified  as  a  potential  target 
was  selected  as  the  true  target,  this  measurement  was  given  a  value  of  50.  And  in 
the  case  of  no  true  target  being  found,  this  measurement  was  given  a  value  100. 

‘  S  9  Summary 

This  chapter  has  described  the  methodology  implemented  in  the  adaptive  cor¬ 
relation  tracking  process.  The  hardware  and  software,  as  well  as  the  specifics  of  the 
FLIR  images  utilized  in  this  research  were  discussed  briefly.  The  new  algorithms  and 
procedures  adapted  to  the  existing  C  language  programs,  along  with  justification  for 
their  use  were  presented  in  detail.  And  the  execution  of  the  programs  was  discussed. 

Chapter  IV  will  present  the  results  obtained  by  the  tracking  programs,  as  well 
as  an  analysis  of  the  results.  Chapter  V  will  present  the  conclusions  reached  through 
this  research  effort,  and  will  recommend  areas  for  further  study. 
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IV.  Results  and  Analysis 


This  chapter  presents  the  results  obtained  by  the  adaptive  correlation  tracker, 
as  well  as  a  comparison  and  analysis.  In  particular,  a  comparison  of  image  prepro¬ 
cessing  techniques  when  used  with  the  adaptive  template,  as  well  as  a  comparison  of 
adaptive  and  set  size  templates  is  given.  Also  presented  is  the  results  of  correlation 
plane  postprocessing  to  improve  tracking  performance.  Finally,  results  of  the  ability 
to  properly  locate  other  targets  in  the  FOV  are  presented. 

4.1  Comparison  Criteria 

For  each  tracking  run  generated  by  the  adaptive  correlation  tracker,  the  data 
utilized  for  comparison  was  the  error  in  pixels  achieved  for  each  frame.  This  value 
represented  the  distance  in  pixels  from  the  true  center  of  the  target  of  interest  to  the 
target  location  as  determined  by  the  tracker.  Figures  15  and  16  demonstrate  how 
error  effected  tracking  by  showing  two  tracks  of  eight  consecutive  frames  of  the  same 
target.  In  Figure  15,  Sequence  1,  Target  2  was  tracked  utilizing  line-by-line  averaging 
with  grey-scale  restored,  small  template  and  search  scene,  target  location  based  on 
largest  peak  in  the  correlation  plane.  In  Figure  16,  the  same  target  was  tracked 
utilizing  no  image  preprocessing,  adaptive  template  with  full  scene  searched,  and 
correlation  plane  postprocessing  to  determine  the  location  of  the  target.  Figure  15 
(a-c)  show  the  target  being  tracked  to  within  5  pixels  of  true  center;  in  (d-f),  the 
tracker  begins  to  drift  forward  of  the  target’s  true  center  with  errors  between  5-10 
pixels;  and  finally  in  (g-h),  the  tracker  loses  the  target  with  errors  between  30-40 
pixels.  In  Figure  16,  (a-h)  show  the  target  being  tracked  within  3  pixels  of  true  center 
through  the  whole  series  of  frames.  In  all  cases,  tracking  began  on  the  true  center 
of  the  target  in  the  first  frame  so  that  no  initial  bias  was  introduced.  Therefore, 
all  tracking  errors  encountered  could  br  attributed  directly  to  the  tracking  method 
utilized.  This  was  done  to  make  a  contjtarison  between  basing  target  location  on  the 
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correlation  peak  with  set  template  and  scene  sizes,  and  finding  the  proper  correlation 
peak  through  postprocessing  in  conjunction  with  an  adaptive  template  and  full  scene 
search.  As  can  be  seen  in  Figure  17,  the  method  which  utilized  set  template  and 
scene  sizes,  along  with  basing  target  location  on  the  location  of  the  highest  correlation 
peak  was  very  sensitive  to  initial  error  offset  when  tracking,  while  the  method  which 
utilized  an  adaptive  template  and  correlation  plane  postprocessing  to  find  the  proper 
peak  in  the  correlation  plane  which  represented  the  designated  target  was  extremely 
insensitive  to  an  initial  error  bias. 

^.2  Thresholding  Technique  Comparison 

To  determine  which  thresholding  technique  worked  best  with  the  adaptive 
template,  all  three  targets  of  Sequence  1  were  tracked  using  the  adaptive  template 
with  the  small  search  scene  option.  This  meant  that  target  location  was  based  only  on 
the  location  of  the  tallest  peak  in  the  correlation  plane.  The  thresholding  techniques 
compared  were  scene  averaging  with  grey-scale  restored,  Cline  averaging  with  grey 
scale  restored,  and  line-by-line  averaging  with  grey-scale  restored  (see  Section  3.3 
for  details).  The  option  to  restore  grey-scale  in  all  cases  was  used  because  Capt. 
Law  (10)  had  found  this  worked  best  for  the  correlation  based  tracker.  In  Figure  18, 
(a)  represents  target  1,  (b)  target  2,  and  (c)  target  3.  For  each  target,  the  tracks 
by  all  three  thresholding  techniques  are  shown.  Even  relatively  small  pixel  errors 
can  effect  the  ability  of  the  tracker  to  remain  on  target.  In  Figure  19,  an  error 
of  approximately  eight  pixels  in  (a)  still  remains  on  the  target,  while  an  error  of 
approximately  twelve  pixels  in  (b)  shows  that  the  tracker  clearly  has  left  the  target. 
The  average  error  versus  thresholding  technique  for  each  tju’get  is  shown  in  Table  1. 
Based  on  the  average  errors  encountered,  along  with  the  error  for  each  target  at 
the  final  frame,  scene  averaging  with  grey-scale  restored  was  chosen  as  the  best 
binarization  technique  to  use  with  the  adaptive  template.  It  was  therefore  the  only 
binarization  technique  compared  with  no  image  preprocessing,  and  no  binarization 
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Figure  15.  TVajcker  losing  Sequence  1,  Target  2  while  utilizing  line-by-line  averag¬ 
ing  with  grey-scale  restored,  smadl  template  and  search  scene,  target 
location  based  on  largest  peak  in  correlation  plane.  Ttack  shows  eight 
consecutive  frames,  (a-c)  target  is  tracked  within  3  pixels  of  true  cen¬ 
ter,  (d-f)  error  increases  to  between  5-10  pixels  of  true  center,  (g-h) 
algorithm  loses  track  of  target,  errors  between  30-40  pixels. 
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Figure  16.  Good  track  of  Sequence  1,  Target  2,  utilizing  no  image  preprocessing, 
adaptive  template  with  full  scene  searched,  correlation  plane  postpro¬ 
cessing  to  determine  target  location.  TVack  shows  eight  consecutive 
frames,  (a-h)  tracks  target  to  within  3  pixels  of  true  target  center  for 
all  frames. 


Figure  17.  Effects  of  introducing  an  error  in  the  initial  designation  of  the  target. 

(a,c,e)  no  image  preprocessing,  adaptive  template  with  full  scene  search, 
correlation  plane  postprocessing,  (b,d,f)  line-by-line  binarization  with 
grey-scale  restored,  small  template  and  search  scene,  target  location 
based  on  highest  correlation  peak.  (a,b)  Sequence  1,  Target  1,  initial 
bias  of  4.47  pixels  (c,d)  Sequence  1,  Tau-get  3,  initial  bias  of  11.18  pixels 
(e,f)  Sequence  2,  Target  1,  initial  bias  of  11.66  pixels. 
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Figure  19.  Effect  of  error  on  tracking  ability,  (a)  an  error  of  approximately  eight 
pixels  remains  on  target,  (b)  while  tracking  another  target,  an  error  of 
approximately  twelve  pixels  is  clearly  off  target. 


with  edge  extraction  in  this  study.  It  was  chosen  because  it  had  the  lowest  average 
errors,  along  with  the  smallest  average  error  in  the  final  frame.  This  differed  from 
the  results  obtained  by  Capt.  Law  (10)  when  a  set  template  size  was  used.  For  a 
set  template,  line-by-line  averaging  with  grey-scale  restored  was  judged  to  yield  the 

best  results.  ^ 
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Table  1.  Average  tracking  error  in  pixels  versus  thresholding  technique  for  each 
target  of  Sequence  1  (see  Figure  2).  Average  based  on  average  error  over 
entire  track  from  approximately  7.5  km  distance  to  terminal. 


Thresholding  Technique 

Average  Error  in 

Pixels 

Target  1 

Target  2 

Target  3 

Scene  Averaging  w/grey-scale  restored 

2.67 

C.22 

2.81 

Cline  Averaging  w/grey-scale  restored 

3.89 

12.67 

2.96 

Line-by-line  Avg  w/grey-scale  restored 

3.42 

7.80 

2.96 

4.3  Tracking  in  the  Presence  of  Multiple  Targets 

When  using  the  location  of  the  tallest  peak  in  the  correlation  plane  for  tracking 
in  a  sequence  where  multiple  targets  are  present  and  close  together,  the  tracking 
system  often  changed  track  to  the  brightest  target  in  the  sensors  FOV.  As  was 
stated  in  Section  3.2,  there  is  no  error  data  available  for  Target  3  closer  than  2000 
meters.  For  this  data,  all  three  targets  of  Sequence  2  were  tracked  using  the  adaptive 
template  with  small  search  scene  option,  and  scene  averaging  with  grey-scale  restored 
image  preprocessing.  In  the  case  of  Target  1,  the  track  had  only  small  errors,  but 
for  Targets  2  and  3,  the  errors  began  much  higher  and  remained  higher.  This  can  be 
seen  in  Figure  20.  This  occurred  because  the  tracker  immediately  began  drifting  to 
Target  1,  the  brightest  of  the  three,  starting  in  the  first  frame  no  matter  which  target 
was  designated.  This  is  shown  in  Figure  21.  Essentially,  this  was  the  same  result 
as  would  be  expected  if  a  hot-spot  tracker  had  been  used.  Since  Target  1  in  both 
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sequences  was  much  brighter  than  the  other  two,  any  hot-spot  tracker  utilizing  the 
full  scene  as  a  FOV  would  track  Target  1  no  matter  which  target  had  been  originally 
designated. 


Figure  20.  Tracking  of  targets  in  Sequence  2  without  correlation  postprocessing. 

Tracking  of  Target  3  ended  at  2000  meters  due  to  lack  of  true  target 
location  information  at  closer  ranges. 


To  demonstrate  the  ability  of  the  correlation  plane  postprocessing  technique  to 
track  a  target  in  the  presence  of  multiple  targets,  tracking  runs  on  all  three  targets 
in  each  sequence  were  accomplished.  These  runs  utilized  the  adaptive  template 
and  searched  the  entire  frame  for  the  proper  target.  Runs  on  each  target  were 
accomplished  using  scene  averaging  with  grey-scale  restored,  edge  extraction,  zind 
no  preprocessing  of  the  original  images.  Error  versus  range  for  each  run  is  shown  in 
Figure  22  for  scene  averaging  with  grey-scale  restored.  Figure  23  for  edge  extraction, 
and  Figure  24  for  no  preprocessing.  In  each  figure.  Sequence  1  targets  1-3  are  found 
in  (a-c),  and  Sequence  2  targets  1-3  are  found  in  (d-f).  The  symbols  x  and  o  were 
placed  on  these  graphs  to  indicate  a  frame  where  a  fallback  measure  to  maintain  track 
was  utilized.  The  presence  of  an  i  indicates  that  the  target  location  determined  by 
the  adaptive  correlation  postprocessing  algorithm  was  not  the  designated  target. 
However,  as  mentioned  in  Section  3.7,  one  of  the  locations  designated  as  a  potential 
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Figure  21.  Drift  of  correlation  peak  tracker  to  Target  1  in  Sequence  2  when  either 
Target  2  or  3  was  designated,  (a)  track  point  at  5980  meters  when  Target 
2  designated,  (b)  track  point  at  1050  meters  when  Target  2  designated, 
(c)  track  point  at  5980  meters  when  Target  3  designated,  (d)  track  point 
at  2140  meters  when  Target  3  designated. 


target  was  judged  to  be  the  proper  target.  The  potential  target  was  chosen  as  the  true 
location  of  the  designated  target  because  it  was  closer  to  the  last  known  location  of 
the  designated  target  in  the  previous  scene  than  the  location  of  the  object  chosen  to 
be  the  target  in  the  current  scene.  The  presence  of  an  o  indicates  that  no  correlation 
peak  match  was  attained,  and  the  algorithm  considered  the  known  location  of  the 
target  in  the  previous  scene  as  its  new  location  in  the  current  scene. 

Figures  22,  23,  and  24  indicate  that  in  all  three  preprocessing  techniques  uti¬ 
lized  the  adaptive  correlation  tracker  with  correlation  plane  postprocessing  was  able 
to  accurately  track  the  designated  target  even  in  the  presence  of  other,  similar  tar¬ 
gets.  However,  a  major  distinguishing  factor  between  the  three  preprocessing  tech¬ 
niques  was  in  the  number  of  frames  in  which  the  wrong  target  was  originally  chosen 
and  a  fallback  measure  had  to  be  utilized.  Table  2  compares  the  number  of  frames 
in  which  the  fallback  measures  were  utilized  for  each  image  preprocessing  technique. 
In  Table  2,  data  is  given  in  the  form  of  ’x/y’  where  i  represents  the  number  of 
frames  where  the  actual  target  was  chosen  from  the  pool  of  potential  targets,  and  y 
represents  the  number  of  times  that  no  target  was  found  and  the  last  known  location 
of  the  target  was  utilized. 

In  the  area  of  tracking  and  average  tracking  error,  both  the  edge  extrac  ion  and 
no  preprocessing  of  the  images  performed  equally  well.  The  option  of  scene  averaging 
with  grey-scale  restored  did  perform  well  on  Sequence  1,  but  did  not  perform  as  well 
on  Sequence  2.  However,  when  the  number  of  frames  which  utilized  fallback  measures 
was  taken  into  account,  the  option  of  no  image  preprocessing  was  clearly  the  best  of 
the  three  options.  This  option  was  able  to  distinguish  between  multiple  targets  in 
the  sensor’s  FOV,  while  also  maintaining  very'  accurate  tracking  on  the  designated 
target.  An  added  benefit  of  this  option  was  the  reduced  processing  time  required 
when  the  frames  were  taken  in  their  original  form  without  data  reduction. 
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Figure  22,  Range  versus  error  tracking  based  on  correlation  plane  postprocess¬ 
ing  using  scene-average  w/grey-scale  restored  image  preprocessing. -Se¬ 
quence  1,  (a)  target  1,  (b)  target  2,  (c)  target  3,  ,nd  Sequence  2  (d) 
target  1,  (e)  target  2,  (f)  target  3.  An  x  indicates  the  selected  target 
was  not  originally  located,  but  was  chosen  from  the  potential  targets, 
while  an  o  indicates  that  no  target  was  found  and  the  tracker  used  the 
last  known  location  of  the  target. 


Figure  23.  Range  versus  error  tracking  based  on  correlation  plane  postprocessing 
using  edge  extraction  image  preprocessing.  Sequence  1,  (a)  target  1, 
(b)  target  2,  (c)  target  3,  and  Sequence  2  (d)  target  1,  (e)  target  2,  (f) 
target  3.  An  x  indicates  the  selected  target  was  not  originally  located, 
but  was  chosen  from  the  potential  targets,  while  an  o  indicates  that  no 
target  was  found  and  the  tracker  used  the  last  known  location  of  the 


Figure  24.  Range  versus  error  tracking  based  on  correlation  plane  postprocessing 
using  no  image  preprocessing.  Sequence  1,  (a)  target  1,  (b)  target  2,  (c) 
target  3,  and  Sequence  2  (d)  target  1,  (e)  target  2,  (f)  target  3.  An  x 
indicates  the  selected  target  was  not  originally  located,  but  was  chosen 
from  the  potential  targets,  while  an  o  indicates  that  no  target  was  found 
and  the  tracker  used  the  last  known  location  of  the  target. 


Table  2.  Comparison  of  number  of  fallback  measmes  utilized  for  each  image  pre¬ 
processing  technique  with  correlation  plane  postprocessing.  Data  is  in 
li  the  form  x/y.  An  x  represents  the  number  of  frames  where  the  target 
location  determined  by  the  tracker  was  not  the  designated  target,  but  the 
designated  target’s  location  was  selected  from  the  pool  of  potential  tar¬ 
gets  based  on  its  being  closer  to  the  last  known  location  of  the  designated 
target  than  the  location  determined  by  the  tracker.  A  y  represents  the 
number  of  frames  where  no  target  was  found.  Tar  2-1  is  used  to  designate 
Sequence  2,  Target  1. 


Image  Preprocessing 

Number  of  Fallback  Measures  Utilized 

Tar  1-1 

Tar  1-2 

Tar  1-3 

Tar  2-1 

Tar  2-2 

Tar  2-  3 

Scene  Ave.  w/grey-scale 

0/0 

0/1 

0/0 

4/1 

8/0 

8/0 

Edge  Extraction 

12/0 

1/0 

22/0 

37/2 

1/5 

1/0 

None 

0/0 

1/0 

0/0 

0/0 

9/0 

7/0 

44  Error  Reduction  and  Walk-off 

One  of  the  'main  goals  of  this  research  was  to  reduce  the  error  encountered  by 
Capt.  Law  during  his  research  (10),  while  also  addressing  the  problem  of  correlator 
walk-off.  Figure  25  compares  the  tracking  achieved  by  the  option  implemented  by 
Capt.  Law,  and  the  best  tracking  achieved  during  this  research.  For  the  comparison, 
tracking  based  on  line-by-line  averaging  with  grey-scale  restored,  a  small  template 
with  small  scene,  and  target  location  based  on  the  largest  peak  in  the  correlation 
plane  (10),  was  used  to  represent  Capt.  Law’s  reseairch.  As  stated  in  Section  4.3,  no 
image  preprocessing,  with  an  adaptive  template,  full  scene  search,  and  correlation 
postprocessing  was  chosen  as  the  best  option  for  this  research.  Table  3  compares  the 
average  error  achieved  by  each  method  for  each  target,  and  Table  4  compares  the 
final  error  achieved  by  each  method  for  each  target.  For  the  rest  of  this  section,  the 
term  ’LineAv/GS  res’  will  be  used  to  represent  line-by-line  averaging  with  grey-scale 
restored,  small  template  and  search  scene,  tau’get  location  based  on  highest  peak 
in  the  correlation  plane  (the  best  results  obtained  by  Capt.  Law),  and  the  term 
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’NoPre/AdPull/Post’  will  be  used  to  represent  no  image  preprocessing,  adaptive 
template  with  full  search  scene,  and  correlation  postprocessing  (the  best  results 
obtained  during  this  research). 


Table  3.  Average  tracking  error  in  pixels  for  research  comparison.  Comparing  line- 
I !  >  by-line  averaging  with  grey-scale  restored,  small  scene  and  template,  lo- 

i :  .  cation  based  on  largest  correlation  peak  (LineAv/GS  res)  and  no  image  . 

i .  preprocessing,  adaptive  template  with  full  scene,  and  correlation  postpro¬ 
cessing  (NoPre/AdPull/Post). 


Research 

Average  Error  in  Pixels 

Targ  1-1 

Targ  1-2 

Targ  1-3 

Targ  2-1 

Targ  2-2 

Targ  2-3 

LineAv/GS  res 

3.71 

9.95 

3.71 

3.37 

22.57 

30.70 

NoPre/ AdFull /Post 

2.99 

1.32 

3.19 

1.03 

1.93 

1.56 

Table  4.  Find  error  comparison  of  research  efforts.  Comparing  line-by-line  aver¬ 
aging  with  grey-scde  restored,  smdl  scene  and  template,  location  based 
-  -  on  largest  correlation  peak  (SceneAv/GS  res)  and  no  image  preprocess¬ 
ing,  adaptive  template  with  full  scene,  and  correlation  postprocessing 
(NoPre/AdFull/Post). 


Research 

Find  Error  in  Pixels 

Targ  1-1 

Targ  1-2 

Targ  1-3 

Tzug  2-1 

Targ  2-2 

Targ  2-3 

LineAv/GS  res 
NoPre/AdFull /Post 

13.15 

2.55 

109.41 

0.71 

19.66 

1.00 

62.32 

1.00 

Andysis  of  Table  3  verified  that  the  average  error  encountered  while  tracking 
had  been  reduced  for  dl  three  targets  in  both  sequences.  The  average  error  improved 
from  the  Capt.  Law’s  research  to  this  research  an  average  of  63%.  This  represented 
a  significant  improvement  in  tracking  performance. 

As  mentioned  earlier,  correlator  walk-off  can  be  attributed  to  the  differences 
in  the  target  from  frame  to  frame.  Because  this  error  is  random  in  nature,  its  effects 
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Figure  25.  Comparison  of  best  tracking  results  obtained  by  Capt.  Law  (10)  us¬ 
ing  line-by-line  averaging  with  grey-scale  restored,  small  scene  and 
template,  and  target  location  based  on  largest  correlation  peak  (Lin- 
eAv/GS  res),  and  this  research  utilizing  no  image  preprocessing,  adap¬ 
tive  template  with  full  scene,  and  correlation  plane  postprocessing  (No- 
Pre/adFull/Post).  Sequence  1,  (a)  target  1,  (b)  target  2,  (c)  target  3, 
and  Sequence  2  (d)  target  1,  (e)  target  2,  and  (f)  target  3. 


are  cumulative.  In  the  situation  encountered  in  this  research,  where  the  sensor 
platform  was  moving  towards  the  targets,  the  effects  of  walk-off  can  become  even 
more  prominent  as  the  distance  between  platform  and  target  decrease  because  the 
amount  of  change  from  frame  to  frame  becomes  greater.  As  seen  in  Table  4,  the  error 
encountered  in  the  final  frame  was  very  large,  and  often  many  times  greater  than 
the  average  error  per  frame.  This  was  a  strong  indication  that  walk-off  was  having 
a  significant  effect  on  the  tracker’s  performance.  On  the  other  hand.  Table  4  shows 
that  the  final  error  encountered  in  the  new  research  was  very  low  for  all  but  one 
target,  and  that  for  all  but  that  target  the  final  error  for  each  target  was  less  than 
the  average  error  encountered  while  tracking  that  target.  The  final  error  encountered 
for  Sequence  1,  target  3  can  be  attributed  to  the  way  in  which  the  target  left  the 
sensor’s  FOV.  Because  this  exit  occurred  over  several  frames,  it  introduced  large 
changes  in  the  targets  size  and  shape  from  frame  to  frame.  This  can  be  seen  in 
Figure  26.  However,  the  overall  results  obtained  in  the  new  research  indicated  that 
walk-off  was  not  a  significant  factor  in  the  ability  of  the  correlation  based  algorithm 
to  track. 

In  order  to  fully  understand  how  all  this  data  effects  tracking  performance, 
snapshots  were  taken  of  the  tracking  of  each  target  utilizing  both  line-by-line  av¬ 
eraging  with  grey-scale  restored,  small  template  and  search  scene,  target  location 
based  on  highest  correlation  peak,  and  no  image  preprocessing,  adaptive  template 
with  full  scene  search,  with  correlation  plane  postprocessing  to  determine  target  lo¬ 
cation.  These  snapshots  were  taken  at  approximately  6000  meters  range,  and  the 
final  frame  of  each  target  in  each  sequence.  The  snapshots,  shown  in  Figures  27,  28, 
29,  30,  31,  and  32  clearly  show  the  difference  in  tracking  ability  between  the  two 
methods. 
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Figure  26.  Frames  showing  the  departure  of  Sequence  1,  Target  3  from  the  sensor’s 
FOV. 
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Figure  27.  Snapshots  of  tracking  Sequence  1,  Target  1  using  (a,c)  no  image  prepro¬ 
cessing,  adaptive  template  with  full  scene  search,  and  correlation  plane 
postprocessing  to  determine  target  location,  (b,d)  line-by-line  binariza- 
tion  with  grey-scale  restored,  small  template  and  search  scene,  target 
location  based  on  highest  correlation  peak.  (a,b)  taken  at  range  of  6010 
meters,  (c,d)  final  frame  of  designated  target. 


Figure  28.  Snapshots  of  tracking  Sequence  1,  Target  2  using  (a,c)  no  image  prepro¬ 
cessing,  adaptive  template  with  full  scene  search,  and  correlation  plane 
postprocessing  to  determine  target  location,  (b,d)  line-by-line  binariza- 
tion  with  grey-scale  restored,  small  template  and  search  scene,  target 
location  based  on  highest  correlation  peak.  (a,b)  taken  at  range  of  6010 
meters,  (c,d)  final  frame  of  designated  target. 
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Figure  29.  Snapshots  of  tracking  Sequence  1,  Target  3  using  (a,c)  no  image  prepro¬ 
cessing,  adaptive  template  with  full  scene  search,  and  correlation  plane 
postprocessing  to  determine  target  location,  (b,d)  line-by-line  binariza- 
tion  with  grey-scale  restored,  small  template  and  search  scene,  target 
location  based  on  highest  correlation  peak.  (a,b)  taken  at  range  of  6010 
meters,  (c,d)  final  frame  of  designated  target. 
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Figure  30.  Snapshots  of  tracking  Sequence  2,  Target  1  using  (a,c)  no  image  prepro¬ 
cessing,  adaptive  template  with  full  scene  search,  and  correlation  plane 
postprocessing  to  determine  target  location,  (b,d)  line-by-line  binariza- 
tion  with  grey-scale  restored,  small  template  and  search  scene,  target 
location  based  on  highest  correlation  peak.  (a,b)  taken  at  range  of  5980 
meters,  (c,d)  final  frame  of  designated  target. 
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Figure  31.  Snapshots  of  tracking  Sequence  2,  Target  2  using  (a,c)  no  image  prepro¬ 
cessing,  adaptive  template  with  full  scene  search,  and  correlation  plane 
postprocessing  to  determine  target  location,  (b,d)  line-by-line  binariza- 
tion  with  grey-scale  restored,  small  template  and  search  scene,  target 
location  based  on  highest  correlation  peak.  (a,b)  taken  at  range  of  5980 
meters,  (c,d)  final  frame  of  designated  target. 
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Figure  32.  Snapshots  of  tracking  Sequence  2,  Target  3  using  (a,c)  no  image  prepro¬ 
cessing,  adaptive  template  with  full  scene  search,  and  correlation  plane 
postprocessing  to  determine  target  location,  (b,d)  line-by-line  binaxiza- 
tion  with  grey-scale  restored,  small  template  and  search  scene,  target 
location  based  on  highest  correlation  peak.  (a,b)  taken  at  range  of  5980 
meters,  (c,d)  final  frame  of  designated  target. 


4-5  Locating  Other  Targets 


While  the  targets  were  being  tracked  using  correlation  plane  postprocessing, 
the  method  of  pattern  recognition  developed  by  Lt.  TVoxel  (14)  and  discussed  in 
Section  3.7  was  utilized  to  try  and  determine  the  locations  of  other  potential  targets 
within  the  sensor’s  FOV.  For  a  location  to  be  considered  a  potential  target,  it  must 
have  been  within  a  small  number  of  pixels  of  a  location  found  by  this  method  in 
the  previous  frame.  Again  data  was  collected  for  three  image  preprocessing  options. 
These  options  were  scene  averaging  with  grey-scale  restored,  edge  extraction,  and  no 
preprocessing.  For  each  of  these,  the  percentage  of  frames  in  which  each  target  was 
correctly  located  as  a  potential  target  while  another  target  was  being  tracked  was 
determined.  Table  5  shows  the  results  that  were  obtained  when  scene  averaging  with 
grey-scale  restored  was  utilized.  Table  6  contains  the  same  data  for  edge  extraction, 
and  Table  7  contains  the  data  for  no  image  preprocessing. 


Table  5.  Percentage  of  frames  where  other  targets  were  located  when  scene  aver¬ 
aging  with  grey-scale  restored  was  utilized. 


Target  TVacked 

Other  Targets 

Target  1 

Target  2 

Target  3 

Sequence  1,  Target  1 

- 

89% 

90% 

Target  2 

57% 

- 

58% 

Target  3 

44% 

35% 

- 

Sequence  2,  Target  1 

- 

35% 

79% 

Target  2 

68% 

- 

37% 

Target  3 

68% 

37% 

- 

Tables  5,  6,  and  7  show  that  while  this  method  of  other  target  identification 
was  not  overly  successful  in  all  cases,  it  was  able  to  correctly  locate  many  of  the  other 
targets  in  excess  of  75%  of  the  sequence  frames.  As  was  mentioned  in  Section  3.7, 
other  target  location  was  dependent  on  having  identified  the  location  of  that  target 
as  a  potential  other  target  in  the  previous  frame.  Therefore,  this  algorithm  did  not 
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j  i:,  Table  6.  -'  Percentage  of  frames  where  other  targets  were  located  when  edge  extrac¬ 
tion  was  utilized. 

■  ■ . 


Target  IVacked 

Other  Targets 

Target  1 

Target  2 

Target  3 

Sequence  1,  Target  1 

- 

45% 

58% 

Target  2 

4% 

- 

0% 

Target  3 

47% 

31% 

- 

Sequence  2,  Target  1 

- 

18% 

42% 

Target  2 

0% 

- 

0% 

Target  3 

2% 

0% 

- 

Table  7.  Percentage  of  frames  where  other  targets  were  located  when  no  image 
preprocessing  was  utilized. 


Target  Tracked 


Sequence  1,  Target  1 
Target  2 
Target  3 
Sequence  2,  Target  1 
Target  2 
Target  3 


Other  Targets 

Target  1 

Target  2 

Target  3 

- 

77% 

92% 

5% 

58% 

0% 

42% 

- 

- 

7% 

87% 

0% 

- 

2% 

2% 

14% 

- 

attempt  to  maintain  track,  but  only  identified  those  frames  in  which  the  location  of 
the  other  target  was  identified  as  a  potential  target  in  two  consecutive  frames.  While 
some  of  the  best  results  were  obtained  with  no  image  preprocessing,  the  option  which 
utilized  scene  averaging  with  grey-scale  restored  had  the  best  overall  performance. 
While  the  performance  of  this  method  was  not  perfect,  the  amount  of  additional 
processing  required  to  accomplish  it  was  minimal.  Meanwhile,  the  potential  benefits 
from  knowing  the  locations  of  other  targets  could  be  tremendous.  The  ability  of  a 
system  to  identify  those  other  targets,  choose  the  highest  priority  target  in  its  FOV, 
and  change  track  to  the  highest  value  target  could  be  extremely  beneficial. 

4.6  Summary 

This  chapter  has  presented  the  results  obtained  through  this  research  effort. 
The  ability  to  track  a  target  in  the  presence  of  multiple  targets  utilizing  correlation 
plane  postprocessing  was  demonstrated.  Also,  the  ability  of  this  algorithm  to  reduce 
the  tracking  error  by  63%  and  to  eliminate  the  effects  of  correlator  walk-off  by 
reducing  final  frame  errors  by  94%  and  maintaining  final  frame  errors  less  than  the 
average  error  over  the  entire  tracking  sequence  was  shown.  Finally,  the  ability  to 
accurately  determine  the  locations  of  other  potential  targets  in  the  sensor’s  FOV 
was  addressed.  For  the  overall  best  results,  the  techniques  which  utilized  no  image 
preprocessing,  an  adaptive  template  with  the  full  scene  seeirched,  and  the  correlation 
plane  postprocessing  described  in  Section  3.6.2  were  found  to  be  the  most  effective. 

Chapter  V  will  present  the  conclusions  reached  during  this  research  and  will 
make  recommendations  for  potential  future  research  efforts. 
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V.  Conclusions 


This  chapter  presents  a  brief  summary  of  this  research,  provides  conclusions 
based  on  the  results  obtained,  and  recommends  areas  for  future  research  efforts. 

5.1  Research  Summary 

Their  were  four  major  goals  of  this  research:  1)  to  track  a  target  in  the  presence 
of  multiple,  similar  targets  of  interest;  2)  to  reduce  the  tracking  error  encountered 
by  Capt.  Law  (10)  in  the  previous  correlation  based  tracker  research;  3)  to  reduce 
the  effects  of  correlator  ’walk-off’  in  the  tracking  algorithm;  and  4)  to  identify  the 
locations  of  other  objects  of  interest  while  tracking  a  designated  target. 

The  first  goal  was  met  through  the  use  of  a  correlation  plane  postprocessing 
technique.  Based  on  the  assumption  that  the  target  changed  little  from  frame  to 
frame,  the  template 'was  autocorrelated  and  the  7x7  array  of  pixels  surrounding  the 
peak  was  extracted.  Since  the  template  correlated  with  the  target  in  the  next  frame 
was  expected  to  have  a  correlation  peak  of  roughly  the  same  height  and  shape,  the 
template-scene  correlation  plane  was  then  searched  to  find  the  peak  which  had  the 
smallest  distance  in  weighted  49-dimensional  space  from  the  template  autocorrelation 
peak.  This  allowed  the  tracking  algorithm  to  identify  the  proper  peak,  instead  of 
just  the  largest  peak,  in  the  correlation  plane  which  represented  the  location  of  the 
designated  target.  This  postprocessing  technique,  in  conjunction  with  an  adaptive 
template  which  set  its  size  to  match  the  actual  size  of  the  target  (see  Section  3.5), 
was  also  used  to  reduce  tracking  error  and  counter  the  effects  of  correlator  “walk-off.” 
Overall,  average  tracking  error  was  reduced  by  an  average  of  63%  and  final  frame 
errors  were  reduced  by  an  average  of  94%.  Finally,  an  algorithm  which  utilized  the 
information  generated  by  the  correlation  plane  postprocessing  method  was  utilized 
to  identify  the  locations  of  other  potential  targets  in  the  scene. 
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5.2  Research  Conclusions 

This  research  reinforced  Capt.  Law's  (10)  major  conclusion  that  an  adaptive 
correlation  based  tracking  system  can  be  utilized  to  track  'real- world’  IR  imaged 
targets  as  long  as  the  following  criteria  was  met.  The  criteria  is  that  the  time 

ili  ^ ' . '  .  .  . 

difference  between  two  frames  was  small  enough  that  no  significant  change  in  target , 

1;  r.  '  '  -  ■  ■ 

size  or  orientation  occurred.  When  this  criterion  was  met,  the  correlation  based 
tracking  system  was  able  to  track  a  designated  target. 

The  presence  of  multiple  targets  in  a  sensor’s  FOV  presented  a  unique  problem 
to  a  correlation  based  tracking  system  which  identified  the  target  based  on  the  largest 
peak  in  the  correlation  plane.  Eventually,  any  such  tracking  system,  whether  corre¬ 
lation  based  or  a  simple  hot-spot  tracker,  would  drift  to  the  brightest  target  in  the 
sensor’s  FOV.  However,  correlation  plane  postprocessing  offered  a  means  of  removing 
this  shortfall.  By  utilizing  the  7x7  array  of  pixels  from  the  template  autocorrelation 
to  find  the  minimum  weighted  distance  of  every  peak  in  the  template-scene  correla¬ 
tion,  the  best  match ‘to  the  size  and  shape  of  the  template  autocorrelation  peak  in 
the  template-scene  correlation  plane  can  be  found.  Using  the  location  of  the  best 
matched  peak  as  the  designated  targets  location  proved  to  be  an  effective  measure 
in  maintaining  track  on  the  designated  target. 

The  combination  of  correlation  plane  postprocessing  and  an  adaptive  template 
algorithm  proved  effective  in  reducing  the  average  tracking  error.  This  research 
significantly  reduced  the  tracking  errors  encountered  by  Capt.  Law  (10).  At  the  same 
time,  where  Capt.  Law,  through  testing  different  image  preprocessing  techniques 
and  using  the  largest  peak  in  the  correlation  plane  as  the  target  location,  found  it 
necessary  to  preprocess  the  input  images  in  order  to  keep  tracking  error  low,  this 
research  found  that  the  combination  of  correlation  plane  postprocessing,  the  use  of 
the  template  autocorrelation  peak  size  and  shape  to  find  the  best  matched  peak  in 
the  template-scene  correlation  plane,  and  an  adaptive  template  worked  best  when 
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no  image  preprocessing  was  utilized.  This  represented  a  decrease  in  the  overall 
processing  time  for  each  frame,  and  was  therefore  considered  to  be  very  desirable. 

While  reducing  the  average  tracking  error,  the  combination  of  correlation  plane 
postprocessing  and  an  adaptive  template  algorithm  also  proved  effective  in  combating 
the  effrots  of  correlator  walk-off.  Although  correlator  walk-off  is  a  random  error,  it 
impacted  Capt.  Law’s  research  (10)  through  an  increase  in  total  error  as  the  sensor 
platform  closed  in  on  the  designator  target.  This  led  to  large  tracking  errors  in 
the  final  frames;  errors  much  larger  than  the  average  tracking  error  of  the  system. 
However,  this  research  yielded  very  small  tracking  errors  in  the  final  frames;  errors 
which  were  smaller  than  the  average  tracking  error  of  the  system.  This  demonstrated 
that  the  new  algorithms  were  able  to  compensate  for  correlator  walk-off. 

Finally,  this  research  demonstrated  that  while  utilizing  correlation  plane  post¬ 
processing  to  accurately  track  a  target  in  the  presence  of  multiple  targets,  that  the 
information  generated  can  also  be  used  to  determine  the  locations  of  other  targets 
of  interest  within  the  sensor’s  FOV.  While  the  algorithm  to  accomplish  this  was  not 
perfect,  it  sometimes,  an  average  between  20%  and  58%  of  the  time  and  sometimes 
greater  than  75%  of  the  time,  was  effective  as  a  means  of  potential  target  location 
identification. 
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Appendix  A.  Adaptive  Tracker  Program  Execution 


In  his  thesis  (10),  Capt.  Law  described  the  operation  of  the  two  C  language 
programs  in  detail.  This  section  provides  a  brief  overview  of  the  programs  operation,  “ 
and  discusses  the  selection  of  new  options  implemented  during  this  research  effort.  ~ 

To  run  the  C  language  programs,  the  SUN  computers  must  be  operating  the 
Open  Windows  environment,  and  two  separate  command  tools  must  be  opened.  The 
first  of  the  two  programs  to  be  executed  must  be  'trac.menu'  (see  Appendix  x). 
Once  this  program  is  running,  'trac.prgn*  must  be  executed  in  the  other  command 
tool.  The  second  program  then  asks  the  user  whether  or  not  images  are  to  be 
displayed  on  the  monitor.  The  operator  who  selects  'no',  then  has  the  ability  to 
temporarily  interrupt  the  program  later  when  it  is  running  and  place  it  in  the  systems 
background  to  complete  execution.  This  allows  other  users  to  operate  the  terminal 
while  the  programs  are  running. 

Two  other  changes  were  made  in  the  operation  of  the  programs.  First  was 
the  addition  of  the  edge  extractor  option.  After  selecting  an  image  preprocessing 
method,  the  operator  was  given  the  opportunity  to  select  edge  extraction  also.  The 
edge  extraction  would  always  occur  after  the  initid  preprocessing  of  the  image. 
The  second  change  in  the  programs  was  the  addition  of  the  two  new  template  and 
search  scene  size  options  as  described  earlier  in  this  chapter.  It  should  be  noted  that 
the  small,  medium,  large,  and  adaptive  template  with  small  scene  options  all  base 
tracking  on  the  highest  peak  in  the  correlation  plane.  Only  the  adaptive  template 
with  full  scene  option  implements  the  correlation  peak  analysis  algorithm  and  the 
tracking  of  other  potential  targets  algorithm. 
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Appendix  B.  C  Language  Computer  Programs 

TRACMENU.C 

,  u  *.!  i  '  [ 


/•  Tiuc.iao.c  •/ 
/•  •/ 
/•  AIR  FORCE  IRRTITUTE  OF  TtCDOLOOr  •/ 
/•  A  FROCESS  TO  EIABLX  COMMUnCATlOl  BETHEEI  OSER  AID  FROORAN  •/ 
/•  hj  Cmft  Full  B.  La>  •/ 
/•  Oetebar  7.  IMl  •/ 
/•  •/ 
/•  aedlFl^d  bj  •/ 
/•  Capt  Daoaia  A  Noatara  •/ 
/•  .  1092  •/ 
/•  •/ 
/•  •/ 
/•  Tbla  la  tba  flrat  of  a  pair  of  prograat  obiefc  aast  ba  raa  •/ 


/a  1b  BBlaoa  la  erdar  be  laplaaeat  tba  adaptlva  cerralatloe  •/ 
/■  traeklac  algerlttaa.  It  coeflguraa  tba  pregraa’a  raqulrad  •/ 
/•  fllaa  and  variablaa  for  laltlal  eparatioa  aad  preaidaa  tba  •/ 
/•  aaatta  aad  preapta  ablcb  aaabla  tba  uaar  to  ceamaicatieB  •/ 


/•  aad  eoatrol  tba  ovarall  adaptlaa  eerralatlea  proeaaa.  ■/ 

/...••.•...•aa.aaaa..aaaaaaaaaaaaaa..a...aa........aa........../ 


•iaeittda  <atdle.b> 
liaelada  <atdllb.b> 

aalaO 

{ 

FILE  afpl,  afp3; 

lat  ebaraetar,  1,  x.aalua,  p.ralua,  dalaj,  atap; 
deabla  z. coord,  y.coord; 

chtx  atrlagClO],  taaplCB],  toBp2[6].  opt  >  'n',  cbolca; 
ebar  ta^,  atata,  raapeaaa,  oa  ■  ’1',  off  •  'O’,  Bakadlr[64}; 
cbar  cIoaa_up[l28} ,  EOS,  It,  alza,  blaarj,  adgar  ■  'a'; 
float  factor; 

/, - ,/ 

/•  Craata  dlraetory  uadar  tap.  •/ 

/. - ,/ 

atrcppCaakadir,  "akdlr  /tap/trac") ; 
ajataaCaabadlr) ; 


/, - ,/ 

/•  Eaaara  laltlal  prograa  aaTlroaaaat  la  aat  corraetlj.  •/ 

/, - — ./ 

lf((fpl  ■  fopaa(''creaabalr.data*', 

< 

prlatf  CFlla  ereaahalr.data  aot  fouadtXa"); 
azltCl) ; 

} 

f eloaaCfpl) ; 

lf((fpl  •  fopaa{"blank.320x49»",  "r"))a-rJLL) 

{ 

prlatf  CFlla  blaBk.320x499  aot  fouadiXa"); 
axlt(l); 
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> 

<clM«(fpl)  i 


prlatf("ExTor  epaolsf  /tap/trkc/*tartl.fl«cl\B*): 
•xltCl): 

> 

fpvtc(e<f.  fp2)i 
<clM*«p2>  i 

if((fpl  ■  fop«B(“/ti^/tr«e/«t«rt2_fl«*", 

i 

prlatfCErrer  ep«aiac  /tap/tr»c/«tar«2_fla(l\a">i 
•xlt(l) : 

> 

fpntcCeff.  fpl); 
fclesaCfpDi 

if((tp2  ■  fepattC/tap/trM/atartS.flag*.  “*"))»»reLL> 

< 

prlDtfC "Error  eponlBC  /tap/troc/at«rt3.flog!\B">: 
ozltd); 

} 

fpute(eff,  fp2); 
lelooo(fp2} ; 

if<(fpl  ■  *opoa<«/t^/trae/EOS.fl«<". 

prlatf  ("Error  opoalag  /tap/troc/EOS.fl*(!\a") ; 
ozltCl): 

> 

fpiitc(off,  tpl): 
leleaoCfpl) ; 

lf((fp2  ■  fopoB("/«ap/trac/optioii_Jlag",  "»"))"«iruu.) 

•C 

prlBtf  ("Error  opanlnc  /taip/trac/optloa.flag!\ii"): 
ozit(l) ; 

} 

fpBtc(off.  fp2); 
f cleaa(lp2} ; 

if((fpl  •  *opaB("/tBp/trae/atata.*laj",  "w"))"IfUlI.> 

{ 

priori  (“Error  opaain{  /n^/trae/atata.llagiXo") ; 
axlt(l): 

> 

lpute(oll,  Ipl); 

1 cloaa(lpl) ; 

il((lp2  “  lopaB("/tzp/trae/atata.lBlo".  "*"))~«UU.) 

{ 

print! ("Error  opaaiof  /top/trac/atata.inloiXii"); 
axit(i); 

> 

lpute(’r’ ,  lp2> : 
leloaa(lp2> ; 

if  (dpi  •  lopaB("/tBp/trac/coorda.llag.l",  "a"))»«IIUU.) 

{ 

priotl("Error  opaning  /top/trae/eoorda.llag.l !\n") : 
azit(i); 

> 

fputc(ofl,  fpl): 
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lf((fp3  ■  f0p«B("/tip/tr»c/eeerdi.flac_3".  '‘*")>>*IDLL) 

{ 

prlatf  Clrrmr  opwlaf  /tiv/trkc/eeerda.flaf.3l\a*‘>: 

•zlt(l); 

> 

fpate(eff.  fp3}; 
lcles«(tp3): 

•trep7(clM&.vp.  *!■  -i  /tap/tr»e/*“) ; 

/. - ./ 

/•  rroapt  n*«r  to  M*eBC«  tk«  program  •troc.pt^.  •/ 

prlBtt(-Xe\B*,  'VOOTOi 

put»("/»— — — — — — 

putaC/*  Tkla  ad^tiaa  eorralatlaa  traeklag  algerltha  •/">; 
putaC/a  ra^ttlraa  tha  eeaenrrast  aaaeutlea  of  a  aacoad  •/*>; 
putaC/a  prograa.  To  aaaura  prepar  ayachroalaatlaa  aad  •/") ; 
putaC/a  aehlaaa  eptlaal  apataa  parfataaaca.  thla  add-  a/a); 
pata(a/a  itleaal  prograa  auat  Pa  azaeutad  la  thla  apa-  •/")•, 
pata(a/a  taa'a  feragreuad  aeda.  Opaa  aaethar  eoaaaad  •/"}-, 
piita(a/a  aladea  (Caaaaad  Tool)  aad  azaeuta  tha  prograa  •/**); 
putaC/a  'trae.pr^'  la  dlracterp  . .  ./plaa/raaaarch.  •/“); 

puta  (  "/  a - — - .......... - - - ............. - ,/«  ) . 

do 

{ 

lf((fpl  a  lepaaC/tap/trae/atartl.flag”,  '*r'‘)>aalVU.) 

{ 

prlatf ("Error  epaalag  /uqp/trac/atartl.flag!\B"); 
azltCl); 

> 

/. - ,/ 

/a  Chock  a  flla  rapaatadlj  till  coatoat  aquala  1.  */ 

/• — - - - - - •/ 

toap  a  f gate (f pi); 
ahilo(taap!aaa) 

{ 

feloaa(fpl} ; 

lf((fpl  a  fopaaC'/ti^/trac/atartl.flag",  ''r")>aa|ULL) 

< 

prlatf ("Error  opaalag  /tap/trac/atartl.flagiNa") ; 
azlt(l) ; 

> 

taap  a  fgatcdpl); 

} 

feloaadpl) ; 

lf((fp3  a  fopaa("/tap/trae/atartl.flag" ,  "*"})>aIUIJ.} 

{ 

prlatf ("Error  opaalag  /t^/trae/atarcl.flag!\a"); 
azlt(l): 

> 

fpatc(orf,  lp3) ; 
feloaa(fp3) ; 

/, - ,/ 

/a  Oiaplaj  targatlag  proapt  aad  raad  kajboard  iaput.  •/ 

/, - ,/ 

prlatf ("Xe\a",  >\007>): 

prlatf  ("/a- — — - — ... — - - - - - •<) . 

prlatf  (“ - a/\B")  ; 


prlatfC/*  1^1  prograa  !■  carrantl;  ap«ratla(  ia*>; 
priatf(*  th»  •/\«">i 

priatfC/*  (r«*-na  Bed*  (only  th«  1m(«  fiBld-Bf"); 
print* •/\n")! 

prlntfC/*  nr*  b«ln(  ■h««n*d  *lth  no  tnrgot  kalng”): 
printfC"  trnek-  ‘/Vn")! 

prlnt*(”/*  od).  Tho  arnUabl*  eptlenn  nr*:  *t‘  to”): 
prlnt*(”  netlT-  */\n"): 

prlntfC”/*  at*  tb*  tar(*tlng  nod*,  to  skip  (b”}; 
print* ("y-pnan)  •/\b”); 

prlntfC”/*  a  portion  of  tb*  long*  oognanco,  or  ■*”}; 
prlntfC”*  to  */\n”); 

prlntfC”/*  oxlt  fren  tbl*  progran  oatlroly.  ”): 

prlntfC”  */\n”); 

prlntfC”/* - ">: 

print*  C“-~— •~*“"*/\n”> : 

print* C”\nlnt*r  doalrod  option:  ”); 

g*ta Catring) i 

•tat*  ■  atrlngCOl; 

atat*  ■  teloaarCatat*) ; 

•bilaCatat*!*'*'  tt  atat*t*‘t*  kk  atat*(**a’) 

< 

print* C"Xe\n".  'VOOT*); 
putaC”Targ*t  or  Exit?”); 
print* C”Ent*r  flrat  lattar;  ”); 
gataCatrlng) : 
atat*  ■  atrlngCO]  ; 

•tat*  ■  toloaarCatata) ; 

> 

If Catat***'*’) 
prlatfC“Xe\B”,  *\00T'): 

print* C”lvBib*r  of  Inagot  to  b*  bypaaaad:  ”); 
gataCatrlng); 

•tap  ■  atolCatrlng) : 

} 

- - - - — - „,/ 

/•  Paai  aalaetad  option  to  ’trae.prgn’  and  r***t  flag.  •/ 

/, - - - 

IfCCfpt  ■  fop*nC"/tap/trac/atat*.iBfo" ,  '’*”))*>IULL) 

< 

print* C"ErTor  opanlng  /tBp/trac/*tat*.lnfo!\n”) ; 
ozltCl) ; 

> 

fprlntfCfpl,  ”Xc\n”,  atat*); 
if Catat***'*’) 

•C 

fprlntfCfpl,  "IdVa”,  atop); 

} 

fcleaaCfpl) : 

ifCCfp2  -  fep*nC”/tat>/trae/atat*.flag",  "a"))— IIUU) 

< 

print* ("Error  opanlng  /tnp/trac/atata.flagJVn”); 
azitCl) ; 

> 

fpoteCon,  fp2) ; 
f cloa*(lp2) ; 


/, - ,/ 

/•  Exit  progran  if  laat  Inaga  baa  baan  •/ 
/•  procaaaad  or  par  uaar’a  r*qu*at.  •/ 
/ . . 
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lf(«pl  ■  tep«a("/ti9/trac/I0S_fl«f<‘,  ■■r''))-«|tILL} 

{ 

priatf  ("Error  opwlac  /t^t/trae/EOS.flaf  IVb"); 
•xltd): 

> 

EOS  -  fg«te(fpl>: 
iS«orror(fpl)) 

{ 

prlat(("Error  roodiaf  froa  /tap/tr4e/E0S.flaf  l\B”>i 
•zltCl)} 

> 

{ 

«hn*(EOSI-ee) 

( 

f cleaa(tpl) ; 

lf((fpl  ■  tepao("/ti[^/troc/Eas.(lar*.  *r*))--roiL> 

< 

prlatf  ("Error  epoalBg  /OBp/troe/E0S.flacl\n") ; 
•rlt(l); 

> 

EOS  ■  tcotc«pl); 

) 

> 

tclos*(fpl) ; 

If (EOSaaoa) 

•y«t«o(clo«a.up) ; 
priatf("Xe\B",  'XOO?'): 

prlatf  ; 

prlatf  (" - "/Va"); 

prlatf ("/•  Tbit  prograa  haa  booa  taxvlaatod  altha"); 
prlatf (“r  la  ra*  a/Sa"); 

prlatf ("/•  apoaaa  to  tba  uaar'a  roquoat  or  baeaua"}; 
prlatf ( "a  tba  a/\B»); 

prlatf ("/•  dlgltlzad  laafas  for  tbla  aaquaaca  baa">; 
prlatf ("  baaa  a/Va"); 

prlatf ("/a  azhaostad.  "}  ; 

prlatf ("  a/\B«); 

prlatf  ("/a- - — .a)  . 

prlatf  (" - — a/\a«); 

azlt(O) ; 


lf{atata-a't’) 

{ 

lf((fpl  a  fopaa("/tBp/trac/atata.flar'',  '•r"))"aIUU.) 
{ 

prlatf  ("Error  epaalaf  /tap/trac/atata.flu!\a"} ; 
azlt(l); 

> 


■  - 

/•  Chock  a  flla  ropaatadly  till  eoataat  aquala  0.  •/ 


tai^  a  igate(fpl): 
ahlla(ta^!aeff) 

{ 

fclOBa(fpl) ; 

IfCCfpl  a  fopaB("/tap/trac/ot»ta.flar",  "r"))aa«Uli.) 
{ 

prlatf ("Error  opaalag  /tap/trac/Btata.fl4g!\a") ; 
arltd); 

> 
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tMf  ■  tg«te(fpl>i 

) 

f  elMa(tpl) : 
priatf(»Xe\a",  'VOOTOj 


priatf  j 

prlatf  : 


priatfC/*  To  ooloet  «  torgot,  ollgn  tho  erooo-*); 
prlatf  Choir  of  o/Vb"); 

prlatfC/*  tho  moboo  oa  tko  torgot  of  latoroot.*'>| 
priatfC  Oboorro  •/^a”); 

priatfC"/*  tho  eorroapoadiag  a-  oad  p*  pizol  co"); 
priatfC "ordiaotoo  a/^a"); 

priatfC"/*  ahowB  ea  th*  looor  portioa  of  th*  dl"}; 
priatf C"opio7  «ia*  */\a">: 

priatfC"/*  do«.  Cator  that*  ceordiaotoo  at  th*")) 


priatfC"  proopt  */\a"); 
priatfC"/*  boloo. 
priatfC"  */\a"): 

priatfC"/*-——-——————————."). 

priatfC - — — */\a"): 


- - - 

/•  hatriav*  n*«r  laputtod  target  coordiaataa.  •/ 

do 

{ 

priatf C"\aEatar  th*  x-  pixel  coordiaata:  ”): 
if  Cg*taCt*apl)"IUU,) 

< 

priatf C"EzTor  raadiag  ia  x-coordiaata!\e"); 
axitCl); 

> 

priatf C"\aEat*r  th*  y-  pixel  coordiaata:  ">j 
if  Cgato  Ct*i^2)**ICnX) 

< 

priatf C "Error  raadiag  ia  p-coordiaataiNa"}; 
exit Cl) ! 

} 

x.valu*  ■  atoiCtaapl); 
p.valu*  ■  atoiCt«ap2>; 

- - - 

/•  Coafiraatloa  of  iaputtad  target  coordiaataa.  ■/ 

- - - 

priatf C"Xc\b".  ’NOOT’); 

priatf C"\aTarg*t  coordiaataa  ar*:\c"); 

priatf C"x  ■  Xd,  ",  z.Talu*); 

priatf C "y  •  Xd  CT/«) . ",  j.Talua); 

gataCatriag) ; 
raapoas*  ■  atriagCO]; 
raapoaa*  ■  tolowarCraapoaaa) ; 

*hll*Craspoaaa!**p'  ht  r*Bpoaa*!"'a'} 

{ 

priatf C"Xe\a",  •\007'): 

priatf C"\aTarg*t  coordiaata*  ar*;\D"); 

priatf ("x  ■  Xd,  ",  x.Talua); 

priatf ("y  ■  Xd  CT/I) .  ",  p.Talua) ; 

gataCatriag) ; 
raapoaa*  *  atriagCO]  ; 
raapoaa*  ■  toloearCraapoaa*) ; 

) 

>whil*(r*spooa*!*'y*): 
priatf C"Xe\n",  '\007>): 
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prlBtf  C — - j 


prlstfC/*  Til*  follewlaf  !«•(•  procasaiaf  tacba*); 
prlstfCiqBM  can 

prlat<("/*  b«  appliad  to  thlo  adaptlvo  eoxrolot**); 
pristfClM  trock* 
prlatf("/*  !■(  alforlthB  . 


prlBtf(" 

pplatf("/*  “>S 

prlo«("  •/\b">j 

prlstfC*/*  A. .  .■isorlsatlea  BOTaallaod  to  aSE**); 
pristfC*.  •/\b"){ 

pplstf("/*  ")j 

prlstfC  •/\s")i 

prlstfC*/*  B. .  .Ilsarlsod  oltb  lso(*  groj-ocol**) ; 
prlstfC***  oBdod.  */\B**)i 

prlstfC**/*  •*): 

prlstfC**  */\s*'): 

prlstfC**/*  C...Tnith*d  t*rg*t  raglesa.  CFros  **); 
prlstfC'e-lKs)  */\B**)i 

prlstfC**/*  *•>: 

prlstfC**  */\b**): 

prlstfC*/*  D...Trutb*d  tao^lot*  •/  ussodlf lod**) ; 
prlstfC**  seos*.  */\8**>; 

prlstfC**/*  CVolld  froB  8>lKs)  •*>; 

prlstfC**  */\b'*); 

prlstfC*/*  *•): 

prlstfC**  */\B")i 

prlatfC**/*  E. .  .Blosdod  Isagaa.  CBlaarlsad)  **); 

prlstfC*  a/SB**); 

prlstfC**/* 

prlstfC*  */\b**): 

prlstfC**/*  F...Bl*ad*d  Isagot.  CGray-aetlad  a**>; 
prlatf  Cddad)  */\8**); 

priatfC**/*  ’*>: 

prlstfC**  */\b**): 

prlBtfC**/*  C...lsag*  eorr*latioB  without  •nha**}; 
prlBtf  C**ae*soats.  a/Xs**); 

prlstfC*/*  •*); 

prlstfC**  */\a**): 

prlstfC**/*  B... Optical  ad^tlw*  tracklag  aisu**}; 
prlstf  C**latloa.  */\a*'}; 

prlstfC**/*  •*): 

prlBtfC*  •/\b’*); 

prlBtf  C**/* - **); 

prlstfC** - */\b"); 


prlBtf C**\BEBtor  dailrad  optloo;  **); 
gataCatriag); 

It  ■  atriag [0] ; 

It  ■  tolowarClt) ; 

whll*Cltl-*a'  kl  It'a'b’  U  lt!**c’  U  lt!>'d*  kk  lt!a*s*  kk  lt!-’f>  kk  lt!-*g*  kk  lt!*'b*) 

< 

prlstf C*Xe\B**.  'SOOT*): 

prlBtf C*EBtar  eptloB  A,  B,  C,  D,  E,  F,  G,  or  H...  **}; 
gataCstrlBg) ; 

It  *  atriag  Co]  ; 

It  ■  tolowarClt); 

> 

IfClt—'a*  II  It— ’b’  II  It— *•'  II  It— ’f’) 

{ 

prlBtf(*'Xc\B*',  ’XOO?*); 

prlstf ("Blaarlzw  wla:  A)  Lloa-bp-llow  awaragaNn"); 
prlstfC*  B)  Seao*  aTaragoXo"}  ; 

prlatfC*  or  C)  CIIb*  Bloarlzatlon? . . .  "); 
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blBU7  ■  vtriactO] : 

hiaMXj  •  tole««r(blBMr7> : 

>bi2«(blJMi7l*'«*  M  biBAryla'b*  kk  blaarylB'cO 

< 

prist*("Xe\a-.  'VOOT'); 

prlatf(”Bat«r  optlea  1,  B.  or  C...  *>: 

g»t*(»triac) : 

blMTT  ■  •triag  [0]  ; 

blMry  «  televarCblMTj) ; 

> 

IfCblMxy— *»•>  .bi*«t7  •  ***5  , 

priatfC’XeXa-.  'NOOTOi 
prlatf("— — •/\a"> : 

prlatfC/*  Tb«  blB4risatloa  thraabeld  for  tbio  *); 
priatfCprograo  Is  •/\«")j 

priatfC/*  eoapatod  u  *tbrashol4«(fsctar  s  thr”): 
prlatfCosbold)'.  •Aa”}; 

prlatfC/*  To  vary  tb*  tbrosbeld,  oatar  a  valu*"): 
prlatfC  for  tba  •/\a'')  ; 

prlatfC/*  Tarlabl*  'factor'  (valu*  oust  b*  bat”}; 
prlatfCoaaa -1  */\o-)j 

prlatfC/*  aad  1).  ”}; 

prlatfC  */\a''): 

prlatf  ! 

prlatf  C-— — — -*/\o") : 

prlatf CEatar  a  aalua  batsaaa  0  aad  1:  ...  *); 

gatB(strlBg); 

factor  a  atof(Btrlag); 

> 

prlatf CXeVa".  'NOOT'); 

prlatf  CUsa  adg*  artractor  (y  or  a)?  Va”); 

g*ts(strlag>; 

adgar  *  strlagCO]; 

adgar  ■  toleaar( adgar) : 


prlatf CXcNa",  'NOOT'); 


prlatfC/*™™———-™-”-™ - 

prlatf  */\a") : 

prlatfC/*  Tb*  taaplat*  aad  scaa*  alsa*  eaa  als") 
prlatf  Co  b*  cbaa-  •/\b"); 

prlatfC/*  gad.  Tba  arailabl*  slzas  ars:  ”} 

prlatfC"  */\a"): 

prlatfC"/*  ") 

prlatfC"  "/Xa"); 

prlatfC"/*  L. .  .T«iq>lat*C«4x40)  aad  Sc*a*Cl93'') 
prlatf C"xl20)  */\a") ; 

prlatfC"/*  ") 

prlatfC"  */\a"); 

prlatfC"/*  K. . .Taaplat*C42z38)  aad  ScaaaClld") 
prlatf C"xTa>  */\a"): 

prlatfC"/*  ") 

prlatfC"  */\a"): 

prlatfC"/*  S. .  .TaaplataCBOxlS)  aad  Sc*o*C60x'') 
prlatf C"38)  */\a"); 

prlatfC"/*  ") 

prlatfC"  */\a"): 

prlatfC"/*  A...AdaptlT*  Taaplat*  aad  Saall  S") 
prlatf C"c*a*  */\a"); 

prlatfC"/*  ") 

prlatfC  */\a"); 
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prlBtf(*/*  r...Adaptlv«  Taaplat*  and  Full  Sc**); 


prlattCaB#  a/Va*): 

priatf("/»  "): 

prlatfC  •/\a*)! 

prlBtf(» - •/\B")i 


prlatfCNaEBtar  daalrad  aptioa:  ”); 

gata(atriB(>i 

slaa  a  BtrlagtO}; 

slaa  a  t«le«ar(aisa) : 

*hlla(slaa|a>l>  tM  slaala'a'  M  alsata'a*  M  slaat>*a*  M  alsaia'f*) 

< 

priBtfC-XeVa'’.  'VOOT'): 

prlstf CEatar  eptiea  L,  R,  S.  A,  or  F . '  *'): 

f ata (atrlag) i 
aiaa  ■  atrlag[0}; 
alaa  ■  toloaar(alaa) ; 

} 

IfCCtpS  ■  fopaaC/tap/trae/coordf.ialo.l*.  *'a'’))aa|rui.t.) 

{ 

prlntf ("Error  opaalag  /tap/trac/eoorda.ioFo.llXB"): 
axlt(l> ; 

> 

fprlBtf(fpa,  "Sd\BXd\BSc\B" ,  x.aalua,  p.valua.  It); 
fprlBtfCfpS,  "Xf\&Xe\B",  factor,  alxa); 
fprlntf(fp2,  "Xc\bXc\b",  blaarj,  adgar); 
f cloBa(fp3) ; 

if((fpl  a  fopan("/tap/trac/coordf.flag.i",  "a"))-aIUU,) 

{ 

prlBtf ("Error  opaalag  /tap/trae/eoorda.flag.l!\B">; 
axlt(l): 

} 

fpute(oo,  fpl): 
fcloaa(fpl) ; 

if((fp3  a  fopaB('7tBp/trac/coordi.flag.3’',  "r"))""IULL> 

•C 

prlatf  ("Error  opaalag  /tBp/trac/coords.flag.3!\o'') ; 
axltd); 

) 

/. - ,/ 

/•  Cback  a  flla  rapaatadly  til)  contaat  aquala  1.  ■/ 

/. - ,/ 

taap  -  fgatc(fp3); 
ahila(taa^!aon> 

■C 

fc].oaa(fp3)  ; 

If  ((fpl  •  f  opoB("/tBp/trac/coord«.flag.3'‘ ,  "r"))""IUI.L) 

< 

prlatf ("Error  opaalag  /tBp/trac/coord«.flag.3!\B”) ; 
axit(l) ; 

> 

taa^  ■  fgatc(fp3}; 

> 

f cloaa(fp2) ; 

if((fpl  •  fopaaCVtap/trac/coordi.f lag.3" ,  ••a"))»»inJl.L) 

{ 

prlatf ("Error  opaalag  /tap/trac/coor<U.flag.2!\c") ; 
axlt(l); 

> 

fputc(off,  fpl); 
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- — ,/ 

/•  lUtri«T«  ria(*,  target  Boabar,  aad  trua  eaatar-of*  •/ 
/•  targat  eoordlBataa  <rea  tha  pregraa  *trac.pt^'.  •/ 

/,— - - - —a/ 

lf((tp2  ■  (epaBC/tap/trac/eaerda.lBie.Z*'.  *'r")>>B|DLL> 

< 

pntBCBrrer  raadiag  frea  /tap/trac/caer4B.la<e.2l''>i 
azlt(l>: 

> 

taap  ■  fgatc(fp2>; 
i<(taBt>l-e<f) 

{ 

tgataCatrlagi  128,  fp2); 
fgataCatrlBg,  128,  fp2): 
z.eoerd  ■  atof (atrlag): 
fgata(atrlBg,  128,  2p2); 

X.eoer8  ■  atef (atrlag) : 
fgatB(BtrlBg,  128,  1 p2) : 
ebaraetar  ■  atol (atrlag) ; 
f cloaa(fp2} ; 


/, - - - - - - - ,/ 

/•  aiaa  tha  uaar  tha  optic.-,  to  track  •/ 

/•  OB  tha  trua  caatar-of-targat.  •/ 

/,— - - - - - - - »/ 

prlatf<"Xe\a",  'SOOr'): 

fTiatt  (■'•••••••••••  TARGET  RAIOE:  Xd",  charactar); 

prlatfC  aatara  aaaaaaaaaaa\n") ; 


prlatf  ("I^ttttod  targat  coordlaataa") ; 
prlatTC"  «ara:  r  ■  Xd,  7  ■  Xd\B*',  z.aalua,  y.valua); 
prlatf(*Trua  eaatar-o7-targat  la  at:  ">; 
prlatfC*!  ■  X5.1f,  7  ■  XS.lfVaVB",  z. coord,  7.coord>: 
prlatf ("Track  oa  caatar-of-targat  laataad?"); 

prlBtf("  (T/I) . ")i 

gata (atrlag); 
raapoaaa  ■  atrlag  CO] ; 
raapoaaa  ■  toloaar(raapoBaa) ; 

«hlla(raapoaaa!>'7'  88  raapoaaa! ■’a’) 

< 

prlatf (-Xc\a",  'NOOT'); 

prlatf ("\aTargat  coordlaataa  ara:\a"); 

prlatf ("z  ■  Xd,  ",  z.valua) ; 

prlatf ("7  "  Xd  (T/g) .  ",  7.Talua); 

gata (atrlag) ; 
raapoaaa  ■  atrlag [0] ; 
raapoaaa  ■  toloBar(raapoBaa) ; 

> 

/, - - - ,/ 

/•  Paaa  uaar 'a  raapoaaa  to  prograa  ’trac.prga'.  •/ 

/, - - - - - ,/ 

lf((fp2  ■  fopaB("/tBp/trac/coorda.lafo.i".  "a"))»IUU.) 

{ 

prlatf  ("Error  opaalag  /t^/trac/coords_lafo.l!\o")  ; 
azlt(l) ; 

> 

fprlBtf(fp2,  "Xc\a",  raapoaaa); 
fcloaa(fp2) ; 

lf((fpl  •  fopoa("/tap/trac/coords.flag.}",  "»"))"«IUI.L) 

( 

prlatf ("Error  opaalag  /tap/trac/coorda.flag.l’Xa") ; 
•xit(l); 
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) 

fpBte(ea,  fpl>; 

> 

d« 

{ 

lf(Cfp3  ■  fop«B(*/t«p/tr*e/»t»rt2.fl»t“,  “r"))««roLL> 

< 

prlBtf  ("Error  epoalag  /t^/trfte/«tkrt3.fl*f  I\b"); 
osltCl): 

> 

/. - ./ 

/•  Cboek  o  fil*  ropoatodly  till  cootaat  oqtttl*  1.  •/ 

■  fg«te(fp3>i 
Whilo(tMpl>OB) 

( 

tclo**(tp2>; 

lf((fp3  ■  fopoa("/tap/trkc/«tart3.fl*g",  "r")>“»in>Ll,) 

•c 

prlatf ("Error  opoalng  /tap/trte/ittrt3_flag!\D">: 
•zit(l); 

> 

taa^  ■  fgotc(fp3>; 

} 

fclooo(fp3) ; 

if  (dpi  ■  fopoa("/tap/tr«c/atort3.flag",  "*">)»"IIHU.) 

( 

prlatf  ("Error  opoalag  /tap/trae/«t«rt3.fl«gl\a"): 
azlt(l); 

> 

fpatc(off,  fpl); 
fcloo«(fpl) ; 

prlatf <"Xe\B".  'NOO?*): 


priatfC"/* - ") 

prlatf  (" - "An"): 


prlatf ("/•  This  prograa  la  curraatlj  tracklag") 
prlatf ("  tba  eboaon  a/Na"); 

prlatf ("/•  targat-of-lat«raat  uaiag  adaptlaa  "} 


prlatf ("eorralatloa.  •/\a''); 

prlatf ("/•  Arailabla  optloaa  ara;  ") 

prlatf  ("  •/W); 

prlatfC"/*  ") 

prlatf ("  a/Xn"): 

prlatf ("/•  V...VaZ7  tba  taaplata  aad  acoaa  a"> 
prlatf ("ladoa  alzai.  a/Xa”); 

prlatf ("/a  ") 

prlatf ("  a/Xa"); 

prlatf ("/a  B...CbaBga  tba  blaarlzatloa  taeba") 
prlatf ("Iqaa.  a/Xa") : 

prlatf ("/a  ") 

prlatf ("  a/Xa"); 

prlatf ("/a  T...Vtr7  tba  blaarlzatloa  tbraabo") 
prlatf  ("Id.  aAa"); 

priatf("/a  ") 

prlatf ("  a/Xa"); 

prlatf ("/a  I...Salact  a  dlffaraat  targat-of -") 
prlatf ("lataraat.  a/Xa"}; 

prlatf ("/a  ") 

prlatf ("  a/Xa"); 


prlatf ("/a  E...£zit  froo  tbla  prograa  aatira”) 


75 


prlatfCIy*  ‘/Xb")! 

");  i,,-  ru.  -  1 

priBtfC  •/\a")j 

prlBtf("/* - 


priatf  ‘/Nb")  : 

prlBtf  CXBXatBr  dMlrad  eptloa:  "): 
fat*(Btrla(} : 

•pt  ■  atrlagCO]; 
opt  ■  tol»«ar(ept) ; 

/. - —./ 

/•  Cback  rapaatadly  till  a  valid  optiea  aaa  dtoaaa.  •/ 

^ila(optl-'a*  kk  eptl-‘*‘  ft*  optl«*B*  ftft  optl>*t*  ft*  »ptl-'bO 

{ 

priBtf("Xe\B«,  'XOOTOj 

pntaCViBdea,  Biaary,  Thraahold,  laa,  or  Ixit?**): 
priBtf ("Xatar  tha  firat  lattar  of  ehoica:  ">; 
fata(atriB(} ; 
apt  ■  atring[0]; 
opt  ■  taloBar(opt) : 

> 

chelea  ■  opt; 

if (opt""**’) 

< 

priBtf <“Xe\B«,  •\OOT)i 

putaCSaall,  Hadiua,  Larga,  Adapt/Saall,  or  Full/Adapt.**); 
priBtf CEBtar  tha  firat  lattar  of  your  ehoica:  ”>; 
gata(atriBg) : 
ehoica  "  BtriBg[0] ; 
ehoica  "  tolevar(choiea) ; 

vhila(eheleal****  ftft  ehoica)"**’  ftft  ehoica)"*!*  ftft  ehoie*i"*a'  ftft  chelc*l"’f*) 

< 

priBtf ("XeXB".  *\00T*): 

priBtf ("Eater  option  S,  K.  L,  A,  or  F...  ">; 

gata(atriag) ; 
choiea  "  atriagCO}; 
ehoica  "  tolo*ar(cheic*} ; 

> 

opt  "  *0* ; 

> 

if (opt ""’t*) 

< 

priBtf ("Xc\n",  *\007'): 

priatf ("Plena*  enter  a  vnlu*  between  0  end  1...  "); 

get* (string) ; 

factor  ■  atof (string) ; 

opt  •  ’o’: 


lf(opt""*b’) 

{ 

printf("Xc\n",  *\007*); 

prlntf("A)  Line-by-lla*.  B)  Scan*,  or  C)  CllaeT...  "); 
gets (string) ; 
choice  *  strlngCO] ; 
choice  *  tolo**r(cholc*) ; 

*hil*(cholc*!"*a*  ftft  choic*:>*b’  ftft  cboic*!"*c*) 

priBtf ("Xc\t",  *\007*): 

printf ("Enter  option  A,  B,  or  C...  "); 

g*ts(atrlng) ; 

choice  •  stringCO] ; 
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ehole*  ■  telo»«r(ckelc«>i 

> 

lf(cheic»^’«'}  cheic*  ■  's’; 
opt  •  *©’ : 

> 

lf((fp3  ■  foponC'/tap/trae/eptlea.lBfe",  *'«*')>MnLL> 

{ 

priatf  ("Error  opoalaf  /tap/troc/optloK_iatoi\B"): 
oxlt(l>i 

> 

fprlBtf(fp2.  "XcXd",  ebelco): 
ifCehoico— 'to 

fprlBtf(tp2,  foctor); 

> 

<clooo(tp3) ; 

If  (((pi  •  f  opan("/tap/troc/optlo&.f  !■(" .  «o«>>»rou.) 

prlatf ("Error  opoalaf  /tap/troe/optioa.fl«gl\B">: 
•zlt(l): 

> 

fputc(eB,  fpl): 
f eleBo(fpl) ; 

- - - 

/•  Exit  prograa  If  Ikst  ha*  booa  •/ 

/•  proca*ao4  or  por  ttoor'i  roquoat.  •/ 

- - - 

lf((fpl  •  fopaa("/ti«p/trae/EOS.flag-,  "r"»—rou,> 

priBtf  ("Error  epaalac  /tiv/trac/EOS.fla*!\ii“); 
axlt(l): 

) 

EOS  ■  (gate (fpl): 
if(farror(fpl}} 

( 

prlntf ("Error  raadlag  Iroo  /top/trac/EOS.flagiXo") ; 
azltd); 

> 

if (opt"»’a’) 

{ 

•hlla(EOS!-on) 

{ 

fcloBa(fpl) ; 

lf((fpl  ■  fapan("/tap/trac/EOS.flu",  "r’‘))«»IUU.) 

{ 

priBtf ("Error  opoBiBg  /t«p/trac/EOS.flag!\B") ; 
axlt(l) ; 

> 

EOS  ■  fgo«c(fpl}; 

) 

> 

fcloao(fpl) ; 

if(EOS— ob) 

( 

apataaCclaxB.up) ; 

priBtf ("Xe\B",  ’XOO?'): 


priBtf  ("/• - -  ; 

priBtf  (" - "Ab"): 


priBtf ("/•  Thla  prograa  haa  baaB  taralBatad  aitha"); 
priBtf ("r  ia  ra-  a/Xa"); 

priBtf ("/•  apeaaa  to  tba  Baar’a  raquaat  or  bacaua"); 


pri»tf(*a  th*  •/\a”); 

prlatf  ("Z*  «l(ttlB*d  iaagM  for  tkli  ku"> 

prlBtfC*  bMn 


priBtf("/*  uhauatad.  >) 

•/Vn"): 

priatf 


pri»tf("“~— •/\n“>  s 
•xit(O): 

> 

> 

>«hlX*(eptM>n'): 

> 
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B.2  TRAC.PRGM.C 


/•  nAC.nuH(.c  •/ 

/•  _  •f 

/.  AIK  roKCE  iisTinm  or  tecbkoloot  •/ 

/•  TKACXS  TAKOET  USIM  TB  TICBIIOUE  OF  AOAFTIVE  CORKELAnOI  •/ 


/• 

bp  Capt  Faul  0.  Laa 

•/ 

/• 

Oetobor  7,  1»B1 

•/ 

/• 

•/ 

/• 

•odlflod  bp 

•/ 

/• 

Capt  OaoBla  A.  Moatara 

•/ 

/• 

Kaptaabar  1,  1892 

•/ 

/• 

•/ 

/•  1Ui  !■  tha  aaeoBA  of  a  pair  of  profraaa  vblcK  aast  ka  raa  •/ 
/•  is  naisea  la  erdar  to  laplaaaat  tha  adaptiaa  corralatioB  •/ 
/•  tracklBf  alferltha.  It  parferaa  tha  raqulrad  eoaputatlBaa.  •/ 
/•  aaaafaa  filaa,  aad  ntiliaaa  KBOKOS  laaga  procaaaiaf  rout*  •/ 
/•  laaa  to  aaaiv^lata  tha  aaqoaetlal  FLIR  laa^aa.  la  (aaaral,  •/ 
/•  it  la  raspoaalbla  for  tha  ovarall  coatrol  of  tha  ad^tiaa  •/ 


/•  eorralatloa  traekiag  procaaa.  •/ 


•iaeluda  <atdlo.h> 
•laeluda  <atdllb.h> 
tiaeluda  <a7a/atat.h> 
tiaeloda  <aath.h> 
•laeluda  <tijia.k> 

aoid  llaa.blaO; 


told  aala(ar(c,  arga) 
lat  arfc; 
char  aargrO ; 

< 

/, - - - ./ 

/•  Oaflaa  aad  laitlallsa  prograa  aarlablaa.  */ 

/, - ,/ 


FILS  afpl,  afpa,  afpS,  *fp4.  afpB,  •tpt.  aJpT,  afpd; 

Char  r3a_ca[13S3>  pad3.2xS[l38] ,  dalayClSS],  bjrta.ca [128]  ; 

char  dlaplaj.feT[128] ,  paddxS.ea [128] ,  raaaBa0ll28] ; 

char  pad4s8.pa[l28] ,  aztr.al[256] ,  aztr.tl [2S8] ,  fft_8l[l28]; 

char  fft.tl[l28],  dlapXa7.8l[128] ,  r2T.p8[l28],  b7ta.8l[l28] ; 

char  pad266.al[128] ,  pad26«.tl [128] ,  dlapla7.tl[128] ; 

char  ceajug.tl[l28] ,  laT_fft[128] ,  b7ta.fllp[l28] .  tarBl[15]; 

char  aztr_Bnb[266] ,  b7ta.8ub[128] .  bTta.f oa[l28] ,  atata.flag; 

char  aoda  •  'f,  atata  ■  'r',  opt  •  'a',  b7ta.tl[128] ; 

char  add.cro88[l28] ,  filaa [200] [128] ,  b.oztru2[l28] ,  aat; 

char  pa.Talna[l2] ,  k.dlapl.fea[l28] ,  k.diapl.tl [128] ,  taap; 

char  q.fllpl28[128] ,  atrla([l28] ,  alza,  k.dlapl.al[l28] ; 

char  aoarch[l28],  athd,  latru.tl  [128]  ,  r2a.old[128]  ,  corr.Bla[l28]  ; 

char  Boaa_ea [128] .  BaaB.pa[l28] ,  cop7.tl[l28] ,  cep7.al[l28] ; 

char  8tat.pk[2S0] ,  opt.flag,  Bultl[l28],  oa  «  *1’,  off  •  ’O'; 

char  f ilaBaBa[l28] ,  tru.eatr [200] L128] ,  rua.nuB[l6].  Catat[280]; 

char  ca.atat[260] ,  d.al[128],  tl.datat [128] ,  al.4atat[l28] ; 

char  aztru.al[128] ,  aztru.tl[l28]  ,  latru.al [128] ,  a.lDa[128]; 

char  pa.atat[2S0]  ,  b.lBa[128],  ftl.4atat[l2e]  ,  gal.4atat[l28]  ; 

char  padl28.al[128] ,  padl28.tl[128] ,  ^.f llp64[128] ; 

char  bla.al[l28],  bia.tl[128],  al_z.bln[l28] ,  tl.z.bla[l28]  ; 

char  pad.4di8pl[128],  blaad.tl[128] ,  bland.al[l28] ; 

char  hpf.al[l28],  hpf.tl[128].  pad64.tl[12A] ,  pad64.8l[128] ; 

char  atat.tlbland[250] ,  8tat.alblaad[2S0] ,  blaad.z.tl [128] ; 
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chkr  [t3«]  .  aipU.tiCXM]  ,  ea^lz.il  [IM] .  tani3[lS]  ; 

char  etl.4atatCl3a]  .  eal.4«tatCl3S] ,  a_p«MzaCl3a] .  rMa>*4[13a}; 
char  eorr.TarCtSa] ,  cerr.atdaTCiaa] .  corr.BaasCtaa] ,  corr.Baz[13a] ; 
char  q.fllp3a[13a]  ,  tt.3raal [13a] ,  al.3raal[13a] .  a.padS[13a]; 
char  b.paMza[l3a]  ,  c.pad4xa[13a] ,  a.arCru3Cl3a] .  atr«[l3a}; 
char  clr.scr[13a]  .  a»wiTy[13a] .  Btrl[13a].  Btr3[X3a}: 
char  (l_pad4zaLt3a].  a.3aacl[13a]  .  a.3ase3[13a] .  a.3ascS[13a] ; 
char  h.3ascl [13a] ,  b.3aae3[l3a] ,  b.3aBca[l3a]  .  a.3hptal[l3a] ; 
char  b.3b]rtal[13a]  .  a.artnil [13a] .  b.axtrul [13a] .  a.padl[13a]: 
char  b.padl[13a],  a.ar«rl [13a] ,  b.aztrl [13a] .  a_3Tlff[l3a]; 
char  b.3TKf[13a].  a.aztr3[13a]  ,  c.padl.4za[13a] .  h_pad3[13a]; 

^•b.r  d.padl.4>a[13a]  .  b.artra[13a]  .  tarf.fila[13a].  raaaM3[iaa] ; 

char  CaaaB[l6],  CrarilB]  .  CBas[lS],  Cala[ie].  CsCda*[lB].  c3raal[l3a]: 

char  a.Baltl[13a]  .  b.Bultl  [13a]  ,  cepj.cs[13a]  .  c^p.ps[i3a]: 

char  rbta.tl[13a] .  rblB.sl[13a] ,  a.3bpta3[l3a] .  b.3bp«a3[l3a] ; 

char  bia.atata  ■  'b‘,  ca.pad4za[13a]  .  pt.pad4za[13a] ,  aBd[B]: 

char  ■.4aaaa[13a] ,  t.4Baaa[l3a] ,  atat.ca [360] ,  atat.pB[360] ; 

char  hi.ps[13a],  hl.ca[13a],  Baaal[13a],  d7Bl.Bl[13a] ; 

char  dyBl.tl[l3a]  ,  aad.sl[13a],  aBd.tl[138].  dyBa.al[13a]  ; 

char  dxBa.tl[13a]  ,  cp7.cs[13a],  BaB«3[iaa].  stat.acl [360]  ; 

char  ranaBaa[138] ,  pletaaBa[138] ,  stat.aal[360]  .  raaaBal [138] ; 

char  dl8pl.flla[138] ,  BaralB([l38]  ,  tazm3[S0].  padtl[13a]: 

char  corrtt[300],  corrta[300],  dlaplaj  ■ 

char  aztr.croB8[l38]  ,  pad.creai[138]  ,  cut.cross[138] ,  tMipo[138]; 
char  pad613.al[l38]  ,  padBlS.tl  [138]  ,  m.t3[138]; 
char  aztr.vlB[13a] ,  adfar  ■  *a'; 

iat  cpcla  ■  0,  pasi  ■  0,  couat  >  0,  rua  ■  0,  charactar,  r; 

lat  z.ralua,  p.ralua,  z.tazB,  p.tara,  targ.aua,  height.  Bidth; 

lat  iatagl,  iatag3,  ladaz  ■  0,  curr.z,  curr.;,  curr.h.  a; 

iat  cuzT.B,  eld.z.taa9l,  eld.y.ta^l,  eld.z.acaaal,  stap; 

lat  old.y.scaaal ,  z.aaab,  p.auab,  max,  mia,  tt.aaz,  tt.ala; 

iat  at.aaz,  at.aia,  tb.aaz,  tb.ala,  total,  aua,  vaiua; 

iat  swap,  z.coord,  7. coord,  i,  J,  k,  1,  a,  a,  z.paak,  p.paak; 

iat  pad.slza  ■  138,  off sat  ■  36,  laagth,  fr.lafo,  tr.lafo; 

lat  z.scoaal,  j.scaaal,  z.taa^latal,  j.taaplatal,  lialt; 

iat  x.ta^latal.siza,  z.taa^latal.siza,  y.seaaal.siza.  digits; 

iat  z.scaaal.slza,  p.dlsplaj.siza  ■  300,  z.dlsplaj.slza  ■  310; 

iat  z.displap,  j.dlsplaj,  tlaaa  ■  0,  jobl,  job3,  jobs  •  0; 

iat  hlgh.o.ps,  high.o.cs,  auabar,  coadl,  coad3,  digltl,  dlgit3; 

iat  ZJ [499] [330] ,  poiatar,  zcaa,  peaa,  czx,  077,  txz,  Xyj,  fact; 

lat  al,  a3,  bl,  b3,  cl,  c3.  dl,  d3,  zz,  77; 

iat  t^z,  tBp7,  cowat,  zpat,  Tpat,  zlan,  7laa,  zadga,  7adga; 

iat  ztar[30],  7tar[30],  holdz[30],  hold7[30],  paiaz,  parB7; 

float  blaad.aaaa,  sl.aaaa,  tl.aaaa,  factor  ■  O.IS; 

float  cortoBp[7]  [7]  ,  cordata[490]  [320]  ,  toapdata; 

float  holdar3,  aoml,  Bora2,  aoraS,  aorat,  aoiac; 

doubla  raault,  distaaea,  aaaa,  auabl,  auabS.  aagla; 

doubla  pia  ■  3.141S93663689793; 

doubla  t.Taloa,  powar,  apowaz,  tt.apowar,  tt.powar; 

doubla  st.apowar,  st. powar,  tb.powar,  tb.apowar,  aaaa.o.pa; 

doubla  aaaa.o.ca,  t_apr,  t.pr,  s.apr,  s.pr.  pr,  apr.  arror; 

doubla  zf.tara,  Tf.tara,  zf. coord,  7!. coord,  f.taap,  zf.paak; 

doubla  Tf.paak,  fvalual,  fwaluaS,  zf.auab,  Tf.auab; 

doubla  zf.eatr,  pf.catr,  outl,  OBt3,  outS,  out4,  outS,  out6; 

doubla  outT,  out8,  taap.i^,  taap.p,  acac.ap,  acaa.p,  factor2; 

doubla  corrrar,  corraaaa,  corrstdar,  corraaz,  corrala,  chack; 

doubla  pareaat,  holdar,  dist,  Bagarr[30] ; 

doubla  aoraall,  aozaalS,  aoraalS,  aoraalc,  aoraalt; 


/, - ,/ 

/•  Cbaeka  for  baaa  flloasaa  of  tha  iaaga  aaquanca  •/ 
/•  aad  aasura  ’trac.aoau'  haa  baaa  azacutad.  */ 
/ . . 


if((fpl  ■  fopaaC’/tap/trac/itartl.flag" ,  '■r”))"a|rn.L) 
< 
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prlatf(-Xe\»",  *\007*>:  ^ 

putaC/*  Tklt  la  tka  aaeoad  of  two  prograaa  ahiek  •/*>; 
putaC/*  Miat  ka  azacutad  ia  oaiaoa  la  erdar  to  lar  •/'*): 
pataC/*  pXaaaat  tka  adaptlaa  earralatloe  traeklaf  •/”>: 
putaC/a  alforltka.  To  aaaura  cerraet  apackrealcat*'  /*>; 
putaC/a  loa,  tka  flrat  pregraa  'trae,.Mau*  anat  ka  a/"); 
puta(a/a  ruaalaf  la  tka  apataa'a  teragrenad  soda  •/">; 
pataC/a  prior  to  tka  ozoentloa  of  tkla  progroa. 
pntaC/a  Opoa  aaotkar  cnaaanil  wladoo  (Coiaaaad  Tool)  •/*>; 
puta(a/a  oad  ozacata  *trae.aaa«'  loeatod  la  tka  a/"); 
potaC/a  . .  ./ploo/raooarek  dlraeterp  kaforo  attaap-  a/*); 
puta(a/a  tlag  to  ra*azacata  tkla  pregraa.  a/")* 

prlotf("\a"); 
azltil) : 

> 

lf(argc<3) 

< 

priatf("*e\B".  'VOOr-): 

puto(“/a— ; 
putaC/a  lacorraet  ceaeaBd  apataz  or  alaalag  kaaa  •/")•, 
putaC/a  fllaaaaa!  Tka  corract  fora  of  tka  coaaaad  a/**}; 
puta(a/a  la  COMKIVD  BASEUKEa .EXT  okara  kaaaaaaa  la  a/«); 
puta("/a  tka  portloa  of  tka  fllaaaaa  oklck  ia  cea*  •/'*); 
puta('‘/a  aoa  to  a  group  of  laaga  fllaa.  For  axaapla  a/"); 
puta(”/a  tka  kaaa  fllaaaaa  for  a  aaquaaca  of  laaga  •/**>; 
putaC/a  fllaa  oltk  aaaai  ObBOlO.plz  to  OkSOSO.plz  a/**}; 
putaC/a  la  t^Sa.plz.  Ba-axaeuta  tkla  prograa  oltk  */"); 
putaC'/a  tka  corract  apataz  aad  kaaa  fllaaaaa.  •/"); 

puta<"/a - a/"); 

priatl("\a"); 

azit(l): 

> 

fcloaa(fpl) ; 


/, - — - - - - - ,/ 

/•  Datanlaa  if  dlaplapa  to  aeraoa  *  •/ 
/•  Buat  ka  ’bo'  to  rua  la  kackgrouad  •/ 

/, - ,/ 

okiloCdlaplapia’p'  kt  dlaplaj  ia'a’} 

< 

priatf ("XeXa",  ’NOOT’); 

puta( "Dlaplapa  oa  acraaa  (T  or  I}?"); 

gataCatrlag) ; 

dlaplaj  •  atrlag[0]: 

dlaplaj  a  tolooar(dlaplaj} : 

) 

for  (zz  a  0;  zz  <•  19;  ♦♦  xz)  { 
koldz[zz)  a  0; 
koldj[zz]  a  0; 
ztarCzz]  •  0; 
jtar[zz]  a  0; 

} 


/. - ,/ 

/•  Dataralaa  aaaa  of  flla  coatalalag  */ 
/*  trua  targat  location  laforaation.  •/ 

/, - ,/ 

atxcpjCitrlag.  arf»[l]); 
laagth  a  atrlaaCatrlag) ; 
forCiaO;  l<(langtk  -  10);  !♦♦) 

< 
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■  atrlasU]; 

> 

*or(k^;  k<(l«#|th  -  lS)s  k**) 

< 

saMlOJ  *  atriacCk]: 

> 

MMlCk]  ■  '\0*i 
<or(J-0;  jO;  J**) 

< 

■•■«2Cj3  >  striacDc  *  J]; 

> 

mm3CJ]  -  ’\0*: 

fer(J-0;  JO:  J^)  nn.anBCj]  ■  fllaaaBaCl  *■  S  ♦  J]; 
niB.Biak[J]  ■  ‘NO*  a 
■trc«t(fil«aMM,  ".tru.eatr"): 

if((fp3  •  fepaaCflXaaaM,  ‘‘r*‘))>a|DLL) 

{ 

priatf( "Error  roadlag  troo  Xil\s*.  filoaaaa): 

ultCl} ; 

> 

f elooo(fp3) : 


/,— - - - - - - - 

/•  Dorozalao  torfot  raaf*  frea  iaafo  filoMaa.  •/ 

/. - ./ 

for(l"0;  KCorge  -  l);  1<-*) 

< 

atrcpyCreriac,  orsvCorgc  •  (1  «  1)]); 
losfth  ■  atrloaCatrlaf} ; 

<er(J<«;  J<6;  J**)  tatalCj]  ■  Btria*Clonffth  -  •  ♦  J3: 
tar»lCj3  ■  '\0'; 
fr.late  ■  otoKtoral); 


/..... - - - — — — - -•/ 

/•  Soarch  tor  aaxehlag  rang*  laferaatlos  •/ 
/•  la  tba  iaaga  trarh  data  fila.  •/ 
/. - ,/ 


aprlBtf (aaarch,  "grap  '  Xd  *  Xa”,  fr.lafo,  filanaaa); 
atrcat(aaareh,  "  >  /tap/trae/taap.tzt") ; 
aystaaCtaarch} ; 

lf((fp4  "  fepaD("/tBp/trac/tiap.tzt",  "r"))“TOLl.) 

{ 

priatf  ("Error  roadlag  /t^/trac/taa^.trcINa") ; 
azlt(l) ; 

} 

/•  If  fooad,  atora  tba  targat  locatioaa,  «/ 

/•  alaa  atora  tba  pradatazaiaad  auabar  0.  •/ 

if (fgataCaaarcb,  138,  fpdjMlOLL) 

< 


atrepy(aaareb, 

atreatCaaarcb, 

taral) ; 

"  0.0  , 

0.0 

0  .  0 

0  ; 

0") 

atreatCaaareb, 

"  0.0  , 

0.0 

0  .  0 

0  : 

0") 

atrcatCaaaxeb, 

"  0.0  , 

0.0 

0  .  0 

0  : 

0\a 

> 

lor(J-0;  J<13e:  J**) 

{ 

fllaa[i3Cj3  •  atrlBg[j]; 
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tni.cBtr[l]  tj]  ■  ■•■rck[j}: 

> 

feXea«(tp4) ; 

> 

/, - - - - - — •/ 

/•  laltiklls*  aOKOS  ■ttb-rotttlM  rn—inil  atriaca.  •/ 

/, - 

atrcpyCrar.ca,  "rartrlff  -i  /tap/trae/euxraat.acaaa  ")j 

atreat(r3T.ea,  "-e  /tap/trac/aeaaal.Tlff  -1  0  bjta  -art  ’Local  Hachiaa’  ”): 
atrcat(r2T.ca,  --r  320  -e  4W)j 

atrcp]r(pad3.2s5,  "apad  -1  /tap/trac/acaaal.Tlff  **): 

Btrcat(pad3.2xS.  "-o  /taq»/trae/aeaBal.pad.3.2x5  -r  320  **>: 
atrcat(pad3.2zS,  "-e  600  -4  0  -a  0  -J  0  -k  O*); 

atrcppCdalaj,  "Traalaa  -1  /tap/trac/aeaBal.pad.3.2>E  ”): 
atrcatCdalay,  "-e  /tap/trae/aeaoal.raalaa  -k  1  -a  }”); 

atrepjCbjrta.foa,  “acoaaart  -i  /ta^/trae/acaaal.raalza  "); 
atreat(bjta.fea,  “-e  /tap/trae/FOV.dlapl  -a  266 
atreatCbjta.doa,  "-t  bpta  -b  0"); 

atrcppCdlaplaj.fea,  “putlaaga  -1  /tap/trac/FOV.dlapl  “I; 
atrcatCdiaplap.foa,  “-z  408  -y  0  -update  .018"); 

atrepy(r2a_ps,  "raa2aiff  -i  /tap/trae/praaioua.acaaa  ">; 

etreat(r2a_pB ,  "-e  /tap/trac/taapl.aKl  *1  0  -t  byte  -at  ’Local  Machloa' 

Btrcat(r3a.pc,  "-r  320  -c  4M"): 

8trcpy(r2a.old,  "raa2alfF  -1  /tap/trac/eld.acaoa  "); 

atrcat(r2a.old,  "-o  /tap/trac/eld.alt<  -1  0  -t  byte  -at  ’Local  Kachlaa’  ") ; 
atreat(r2a.old.  "-r  320  -c  490") ; 

atrcpy(pad4z6.ca,  "apad  -1  /tf^/trac/aeaaal.aUf  "); 
atrcat(pad4z8.cB,  "-o  /t^/trac/acasal_pad.4z8  -r  400  "); 
atrcat(pad4z6.ca,  "-e  800  -d  40  -a  160  -J  0  -k  0"); 

atrepy(pad4z8.pa,  "apad  -i  /tap/trac/taapl.alff  "}; 
atrcat(pad4z8.pB,  "-o  /tap/trac/tai^l_pad.4z8  -r  400  -c  800  "); 
0trcat(pad4z8.ps,  "-d  40  -a  160  -j  0  -k  0"); 

Btrepy(ea_pad4z8,  "apad  -1  /tBp/trac/acanal.datat  ”>; 

Btrcat(ca_pad4z8,  "-e  /tap/trac/pad.dzd.aeaaal  -r  400  ”); 
atrcat(ca_pad4z8,  "-c  800  -d  40  -a  150  -J  0  -k  0">; 

strcpy<ps.pad4z8,  "apad  -1  /ta^/trac/taapl.datat  "); 

8trcat(pa_pad4z8,  "-o  /ta9/trae/pad.4z8.ta^>i  -r  400  -c  800  "); 
Btrcat(p8.pad4z8.  "-d  40  -a  160  -J  0  -k  0"}; 

8trcpy(a_pad4z8,  "apad  -1  /tap/trac/a.padl.aOa  "); 
atreat (a_pad4z8 ,  "-e  /tap/trac/a_pad3.4z8  -r  400  "}; 

8trcat(a_pad4z8,  "-c  800  -d  40  -a  160  -J  0  -k  0"); 

Btrcpy(b.pad4z8,  "apad  -i  /tap/trac/b.padJ.aOa  "); 
atreat (b.pad4z8,  "-o  /tap/trac/b.pad2.4ze  -r  400  ~); 
atreat (b.pad4z8,  "-c  800  -d  40  -a  160  -j  0  'k  0"): 

atrcpy(c_pad4z8,  "apad  -1  /taq»/trac/a.byta.iDta^  : 
atreat(c.pad4z8,  "-o  /tap/trac/c.padl.4z8  -r  400  "); 
atreat (e.pad4z8,  "-e  800  -d  40  -a  160  -J  0  -k  0~) ; 

atrcpy(d.pad4z8,  "apad  -1  /tap/trac/b.byta.lBacasa  "); 
atreat (d_pad4z8,  "-o  /tap/trae/d.padl.4z8  -r  400  '); 
atreat (d.pad4z8,  "-c  800  -d  40  -a  150  -J  0  -k  0"); 
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"’P*^  /tiip/tr*e/«e««l.Tl*f  -); 
•trc4t(p*4.4dl*pl.  "-0  /tap/trK/pB4.4x«.tfiapt  -r  400  -e  iOO  •>; 
•treat (p44.4di*pX,  "-4  40  -•  160  -J  0  -k  O*); 

■trcprCdiaplay.tl,  -pstlaH*  »1  /tap/trae/Tl.dlap  “>i 
•treat (diapUy.tl.  “-x  931  -y  60  -update  .0U“); 

•trepyCdleplay.al,  "putlM*«  -1  /tup/trae/»ub.ee«ial  "); 

•treat  (diaplay.al,  “-x  931  -y  200  -update  .0U“>: 

•trepy(pad266.tl,  "»pad  -i  /tav/trac/xub.tMpl  ">; 

•treat (pad36e.tl,  "-o  /tup/trae/eub.teaipl.pad  -r  266  -e  266 
•treat (pad26e.tl.  "-d  108  -e  96  -J  0  -k  0->; 

•trcpy(padl28.tl.  "»pad  -1  /tap/trae/eub.te^l  ">s 
■treat (pa4128.tl,  "-e  /tap/trae/aub.tee^l.pad  -r  126  -e  128 
•treat (pa4128.tl.  "-d  60  -e  43  -J  0  -k  0"): 

■trepy(pad64.tl.  "»pad  -1  /tap/trae/aub.te^pl  "): 

■treat (pad64.tl,  "-o  /ti^/trae/eub.teapl.pad  -r  64  -e  64  "); 
■treat (pad64.tl.  "-d  22  -a  17  -J  0  -k  0"); 

■trcpy(pad286.*l,  "Tpad  -i  /ti^/trae/eub.eeenel 

■treat (pad266.*l,  "-o  /t«p/trae/«ub.eceael.pad  -r  266  "); 

•treat <pad266.*l.  “-e  266  -d  68  -e  32  -j  0  -k  0«); 

■trepy(padl28.«l,  “Tpad  -i  /tiq>/trac/eub.eeenel 

■treat (padl28.«l,  *-o  /ti^/trae/eub.Beenel.ped  -r  128  ”>j 

•treat (padl28.»i,  "-e  128  -d  28  -e  6  -J  0  -k  0"); 

•trepy(pad64.ai,  "rpad  -1  /tup/trae/eub.eeenel  "> ; 

■treat (pad64.el,  "-o  /tup/trae/eub.eeeael.pad  -r  64  "); 

•treat Cpad64.*l.  "-e  64  -d  13  -e  2  -J  0  -k  0”); 

■trepy(pad612.«l.  "rpad  -1  /tap/trae/aub.ecenel 

■treat (pad612.al.  "-o  /t«p/trae/»ub.eeenel.pad  -r  612  ">! 

■treat (pad&12.al,  "-e  612  -d  0  -e  0  -J  0  -k  0"); 

■trepy(ftt.tl,  "rltt  -11  /tap/trae/aub.teupl.pad  "); 
■treatdft.tl,  "-ol  /t«p/trae/eub.teupl_«t  -d  0"); 

■trepy(fft_t3,  "rfft  -il  /taip/trae/eub.teBp2.pad 
■treat (fft.t2,  "-ol  /t«p/trae/»ub.te«p2.fft  -d  0"); 

•trepy(fft.sl,  "ritt  -11  /tup/trae/aub.ecenel.pad 
■treat(fft_al,  "-ol  /tup/trae/cub.sceoel.fft  -d  0"); 

■trcpy(coBjuc.tl,  "eeoaj  -1  /t^/tree/»ub.te«pl.fit  "): 
•treat(oonjug.tl,  "-o  /t«p/trac/oub,tei^l.eooj") : 

■trepy(«ulti,  "twiI  -11  /ti^/trae/oub.*eeoel.fft 
■treat(*ultl,  "-12  /tap/trae/»ub.te«pl.eonj 
■trcat(aultl,  "-o  /tup/trae/aeenel.x.teupl") ; 

•trepy(eorTt«,  "tuuI  -11  /t«p/trac/eub_«ee»el.fft 
■treatCeorrti,  "-12  /t«p/trae/»ub.te^l.eonJ  "); 

■treat (eorrte,  "-o  -  I 
•treat (corrte,  “ritt  -11  -  "); 

■treat ( eorrti ,  "-ol  -  -d  1  I 
■treat (eorrt*,  "rtranalat  -1  -  "): 

■treat  (coma ,  "-o  -  -x  266  -y  266  -w  1  I  ; 

■treat (corrta ,  "rctor  -1  -  ") ; 

■treatCeorrta ,  "-o  -  -t  3  I  : 

■treat (eorrta,  "rextreet  -1  -  -o  - 
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•tre«t{eorrt*,  "”x  0  -y  0  -w  4*9  -h  320  I  ■); 

•treat (eorrt*.  "rKf^t  -1  -  •>! 

•treat  (carrta.  ''-o  /tap/trae/tap.3  -J  I  -b  0  “>j 
•treat  (cerrta.  "-i  0  -t  1  *>: 

•trcpyCeerrtt.  "rmil  -11  /tiip/trae/aiib.t«i^2.«t  "); 

•treat (eerret,  "-12  /tmp/trae/eub.tt^l.eoaj  ■>; 

•treat (eorrttt  "-o  -  1 
•treatCeerrtti  "rflt  -11  -  "): 

•treat (eetrtt,  "-ol  -  -d  1  I 
•treat(e«rrtt.  "rtranalat  -1  -  "); 

•treat (eerrtt,  "-o  -  -x  264  -y  264  -*  1  I  ">} 

•treat (corrtt,  “retor  -1  -  ")i 
•treat (eorrtt,  "-o  -  -t  3  1  ">; 

•treat (eorrtt,  "vaxtraet  -1  -  -o  - 

•treat (eerrtt,  “-x  263  -y  263  -■  7  -h  7  I  •*); 

•treatCeerrtt,  “Tlfy2eat  -1  -  ">; 

•treat (eerrtt,  *-o  /tap/trae/tap.3  -J  I  -b  0  *); 

•treat (eerret,  "-d  0-1  1 

■trepy(b.jailtl,  "raul  -11  /tii^/trae/«Tlll.4»tat 
■treat (b.aulti,  "-12  /tap/trae/b.padl.wl*  *): 

•treat (b.Bulti,  “-o  /t«p/trae/b.byt«.iaaeaa«“) ; 

•trepy(a.^ti,  “twil  -11  /ta^»/trae/tTlll.4etat  "); 

■treat (a.aultl,  "-12  /tap/trae/a_padl.«l( 

■treat (a.Bultl,  "-o  /ta9/trae/a.byt«.iat««p") ; 

•trepydat.llt,  “tilt  -11  /t«p/trae/»eaoat.x.taapl  ">; 
■treat(laT.fft,  "-ol  /tnp/trae/iarare^.llt.l  -d  1"); 

■trepy(q.lllpl2e,  "rtranalat  -1  /tap/trae/ls»«raa.llt.l 
•treat(q.lllpl28,  "-o  /ti^/trac/rtraMlat*.!  -x  128  -y  128  -•  1") 

■trcpy(4.111p44,  "rtranalat  -1  /tap/trae/i»*«r»«.«t.l 
•treat (^.lllp44,  "-o  /tep/trac/rtranalata.l  -x  44  -y  64  -»  1"): 

•trcpy(4.111p32,  "rtranalat  -1  /tnp/trac/in*«r»a.«t.l  "): 

•treat (4_lllp32,  "-o  /t^/tra6/rtran»lat».l  -x  32  -y  32  -■  1"): 

■trepy(byta.lllp,  "Teen»«rt  -1  /ti^/trae/rtranalata.l  "); 

•treat (byte.lllp,  "-o  /t«p/trac/eonT2byt«.l  -n  266 
■treat(byt«.lllp,  "-t  byta  -b  0"); 

■trcpy(atat.pk,  "ratata  -1  /tnp/trae/eenT2byt«.l  "); 
■treat(atat.pk,  "-1  /tnp/trac/paak.eoord*.l  -all  3  -nn  0 
■treat (atat.pk,  "-»ar  0  -ad  0  -raa  0  -vnax  0  -max  1  "): 

■treat (atat.pk,  "-ynai  1  -min  0  -min  0  -ynin  0  -in  0 
■trcat(«tat.pk,  "-pin  0  -nia  0  -pta  0  -ppta  0  -npta  0 
■treat (atat.pk,  "-ak  0  -kur  0  -ant  0  -eon  0  -b  1"); 

■trcpy(byt*_aiib,  "reonrort  -1  /tnp/trac/nub.dinpl.cooT  "); 
■treat(byt«.aiib,  "-o  /tnp/trae/ready.441apl  -n  266 
•treat (byta.aub,  "-t  byt«  -b  0"); 

■trepy(add.croa(,  "radd  -11  /ti^/trac/anb.dlapl.dat« 

■treat (add. creaa,  "-12  creaabalr.data  ”}; 

■treat ( add. croai,  "-o  /t«p/trac/mib.diapl.conT“) ; 

■trepy(«xtr.croaa ,  "T«xtract  -I  croaibalr.data  "); 
■trcat(«xtr.eroaa,  "-o  /tnp/trac/croa«.dat«  -x  130  -y  75  "); 
■treat (axtr. creaa,  "-■  60  -h  60 

■trepy(pa.atat,  "aatati  -1  /t«p/trac/t««pl.»ill  ") ; 
•treat(pa.atat,  "-1  /tnp/trac/atatl»tlc».pa  -all  0  -eu  0 
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■tre«t(p*.at«t,  “-»*r  0  -•4  0  -n*  0  'Vmx  0  >nu  1  ">; 
rtrc»t(pa_stat,  "'■jmx  1  -vmla  0  -ial&  0  0  -Im  0  "}; 

ttrcat(pi.«tat,  "-pia  0  -al*  0  -pt»  0  -ppti  0  -apt*  0  ■>; 

•treat(p*.itat,  "-tk  0  -kar  0  -aat  0  -can  0  -b  1“); 

•trcp7(c*.*tat,  "T*t*t*  -1  /tt^/trmc/»eaa»i.riH  ">: 

•trcat(ci.*tat.  "-f  /t*ip/trac/*tatl*tic*.e*  -*11  0  -an  0  ■■>! 
■trcat(ca.*t«t.  "-t«p  0  -*4  0  -*m  0  -vaaz  0  -anas  1  ■); 

■treat (c«.*t at,  "-ynaa  1  -wala  0  -anla  0  -pnla  0  -la  0  ">s 
•treat  (ca.atat,  “-pin  0  -ala  0  -pt*  0  -ppt*  0  -^*  0  "); 

•trcat(ca.*tat.  "-ak  0  -kar  0  -ant  0  -eon  0  -b  l“)j 

•trepjCatat.p*.  "ratat*  -1  /tnp/trae/tnyl.tnaaa  “)j 
■treat (atat. pa.  /tap/trae/atatiatlea.pa  -all  0  -na  0  "); 

■treat  (atat.pa,  "-aar  0  -*4  0  -ma  0  -anas  0  -saaa  1  “>} 

•trcat(atat.pa,  "-pnaa  1  -anla  0  -anla  0  -jnla  0  -la  0  “>: 

■treatCatat.pa,  "-pin  0  -ala  0  -pta  0  -ppta  0  -apt*  0  *>; 

■trcat(atat.pa,  “-ak  0  -kur  0  -aat  0  -eon  9  -b  1“); 

■trcpyCatat.ea,  “aatata  -1  /tap/trac/acaaai.4naaa  "); 

■treat ( atat .ea,  “-f  /tap/trae/atatiatlea.ca  -all  0  -au  0 
■treat(atat.ca,  “-aar  0  -*4  0  -ma  0  -aaax  0  -anax  1  “}; 

■treatiatat.ca,  “-pnaz  1  -anla  0  -anla  0  -pala  0  -la  0  ">; 

■treat (atat. ea,  “-pin  0  -ala  0  -pta  0  -ppta  0  -apt*  0  ”); 

■treat (atat. ea.  “-ak  0  -kur  0  -aat  0  -eoa  0  -b  1">; 

■trcppCatat.atl,  "aatata  -1  /tap/trae/aub.ta^l  “>; 

■trcat(atat.atl,  "-i  /tap/trac/atatiatlea.pa  -all  0  -au  0 
■trcat(atat.atl,  "-aar  0  -*4  0  -ma  0  -max  0  -anax  1  ">; 

■treat(atat.stl,  "-pnaa  1  -anin  0  -anla  0  -jala  0  -in  0  "); 
■treat(atat.atl,  "-pin  0  -ala  0  -pta  0  -ppta  0  -npta  0 
■treat (atat.atl,  "-ak  0  -kur  0  -aat  0  -eon  0  -b  J"); 

•trepyCatat.aal,  "aatata  -i  /taq>/trae/aub.acaeal  "); 

•trcat(atat.aal,  "-1  /ti^/trae/atatlatica.ca  -all  0  -au  0 
■treatCatat.aal,  "-aar  0  -*4  0  -ma  0  -aaax  0  -anax  1 
atrcat(atat.aal,  "-ynax  1  -aaia  0  -xala  0  -yala  0  -ia  0 
atrcatCatat.aal,  "-pin  0  -nia  0  -pta  0  -ppta  0  -npta  0  ; 

■treat(atat.aal ,  "-ak  0  -kur  0  -aat  0  -con  0  -b  1"); 

atrcppCatat.alblaad,  "aatata  -i  /tap/trae/curr.bland.praT  ”> ; 
atrcatCatat.albland,  "-f  /t^/trac/atatlatica.ca  -all  0  -nu  0 
■trcatCatat.alblaad,  "-aar  0  -ad  0  -ma  0  -aaax  0  -aaax  1  ; 

atrcatCatat.alblaad,  "-ynax  1  -anla  0  -aala  0  -Tala  0  -ia 
atrcatCatat.albland,  "0  -pin  0  -ala  0  -pta  0  -ppta  0  -apta"); 

atrcatCatat.alblaad,  "  0  -ak  0  -kur  0  -ant  0  -eon  0  -b  I"); 

■trcpxCatat.tlbland,  "aatata  -i  /tap/trac/praa.blaod.old  "); 
atrcatCatat.tlbland,  "-f  /tnp/trac/atatiatica.pa  -all  0  -nu  0 
atrcatCatat.tlbland,  "-aar  0  -ad  0  -ma  0  -anax  0  -anax  1 
atreatCatat.tibland,  "-jnax  1  -anin  0  -xnin  0  -Tain  0  -ia  ”); 
atrcatCatat.tlbland,  "0  -pia  0  -nia  0  -pta  0  -ppta  0  -npta"); 

atrcatCatat.tlbland,  ’  0  -ak  0  -kur  0  -ant  0  -con  0  -b  1"); 

■trcpfCCatat,  "aatata  -1  /ta^/trac/raal.datat  ">; 
atreatCCatat,  "-f  /tnp/trae/Catatiatica  -all  0  -au  0  "); 

■treat CCatat,  "-aar  0  -ad  0  -ma  0  -max  0  -anax  1  "); 
atreatCCatat,  "-jrnax  1  -anla  0  -xala  0  -pain  0  -la  "); 
atreatCCatat,  "0  -pin  0  -nia  0  -pta  0  -ppta  0  -npta"); 

atreatCCatat,  "  0  -ak  0  -kur  0  -aat  0  -eon  0  -b  1"); 

atrepxCcSraal ,  "actor  -1  /tnp/trae/atranalata.l  -o  /tnp/trac/raal.datat") ; 
atreatCc3raal,  "  -t  1"); 

atrcppCal.z.bla,  "anul  -11  /tnp/trac/acanal.alff  "); 
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•treat  (•l.x.blB,  "-la  /tap/trae/^.aewal  ”)} 

■treat  (•l.x.biB,  /tar/trae/aeaBal.Tlff) ; 

■trep7(tl_x.bla,  "rml  •It  /tap/trae/ttBpl.tlff  ■>; 

■treat(tljK.bia,  *-13  /taip/trae/tap.taa^l  *); 

•treat(tl.x.bla,  *-e  /ta^/trae/tai^i.elff *) ; 

■trep7(blaad.*l,  "rblaad  -11  /tap/trae/sewMl.Tllf  -13  *>; 

•treat (bXaeA.sl,  "/tap/trae/taapl.rlfl  -x  O.b  -•  *}] 
•treat(blaB4_Bl,  */t^/trae/earr.blaBd.prar") ; 

Btrep7(blaBA.tl.  "rblaa^  -11  /t^/trae/t«i^l.rltf  -13  ■); 
•treat(blaad.tl,  */ta^/trac/eld.rlff  -x  O.t  -•  *); 

■treat(bl«ad_tl ,  */t^/trae/pr«T_blaad.old*) : 

■trep7(blaBd.x.tl,  “*»1  -11  /tap/trae/ti^l.vlff  -13  ■>} 

■treat (bl«ad_x.tl,  */tap/trae/taf.taapl  -o  /tap/trae/ta«pl.rlf f *>  i 

■trep7(blaad.x.al,  "ra®!  -11  /t^/trae/aeaaal.rlff  -13  ">: 
■treat(blaed.z.al,  "/ta^/trac/taf.scaaal  -o  /tiq>/trac/scaaal.Tltf") ; 

■trcp7(aipXz.tl,  “rrtoe  -1  tap/trac/prat.blaBd.oXd  -o  ">; 

■treat (eapXz.tl.  */t^p/trac/bXaad.3eapU.tl  -t  1">; 

•trep7(ei9lz.al.  “rrtoe  -11  /tMp/trac/ciirr.bl«kd_pr»r  -o  "); 
■treat(ei9Xx.al,  “/tMp/trac/bXaeOovXx.al  -t  1"); 

•trep7(l^f.tl.  “rbpf  -1  /tap/trac/blaBd.3eaplx.tl  -o  “); 
■treat(^t.tl,  "/tap/trae/prar.bXaad.eXd  -a  3  -e  0.6"); 

•trcp7<hpf.*l,  "rbpf  -1  /taip/trae/bXaBd.3eapXx.sl  -o  *>: 

■treat (bpf.al,  "/tap/trae/curr.bXaad.prar  -a  3  -e  0.5") ; 

•trcp7(tl.3raal.  “rctor  -1  /tap/trae/sub.ta^l  -o  ">; 

■treat (tl.3raal,  “/tap/trac/tl.fer.ctat  -t  1"); 

■trep7(al.3r«aX,  "rctor  -1  /tap/trac/aab.aeraal  -o 
■trcat(al.3raaX,  "/tBp/tra6/«l_lor.«tat  -t  1"); 

■trcp7(a_3asel,  "rprdata  -1  /tBp/trae/atarK.4atat 
■treat(a.aaacl,  "-f  /ta9/trac/ttars.aaeli.data  -■  0">; 

■trep7(b.aasel,  "rprdata  -1  /t:^>/trae/btars.4«tat  "); 

■treat (b.Saael,  "-f  /t^>/trae/atar{.aBell.data  -■  0"); 

■tr^7{a.aaae2,  "rprdata  -1  /tap/trac/a.tars.raet  "); 

■treat(a.aaae2,  "-f  /tiq>/trae/a.tars.aseli  -■  0"); 

■trcp7Cb.2aac2,  "rprdata  -1  /tap/trac/b.tars.ract  "); 

■treat (b.3aae2,  "-1  /ti^i/trae/b.tars.asell  -■  0"); 

■trcp7(a.2aae3,  "rprdata  -1  /ti^/trae/tbk^.datat  ">; 

■treat (a_aase3,  "-1  /ta^/trac/tbkfBd.aaell.data  -■  0"); 

■trcp7(b.2aac3,  "rprdata  -1  /tiq>/trac/abkgnd.4stat  "); 

■treat (b.2asc3,  "-f  /tap/trae/abkgBd.aaell.data  -■  0"); 

■trcp7(a.2b7tal,  "rcoarart  -i  /tap/trac/a.tarK.3Tl;f  "); 

■treat (a.2b7tal.  "-o  /tBp/trae/a.tar^3b7t«  -o  OT  -t  bpt*  -b  0">; 

■trep7(b_3b7tal,  "rcoarart  -1  /t«p/trac/b.tarj.2Tllf  ">; 

■treat (b.SbTtal,  "-o  /t^/trae/b.tar^Sbpta  -a  PS  -t  byta  -b  0"); 

■trep7(a.2b7ta2,  "rcoarart  -1  /tBp/trac/a.targ.2Tlff  "); 

■treat (a.3b7ta2,  "-o  /tap/trac/a.targ.3b7ta  -a  355  -t  bjta  -b  0"); 
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•trep7(b.abyta3,  "vcoavart  «1  /t^/trM/b.t«rg.3Tiff  *>1 
■trcAt(b.ab7ta3,  /tap/trM/b.targ_abjt«  -»  2SS  -t  hyt*  -b  0") 

■trepyCdysl.sl.  “vdyth  >1  /t^/trkc/earT.bl«ad.pr««  "): 

■treat (djBl.a It  /taiy/trac/bla.aK3_«t  -■  S  *b  S  -t  ">t 

•trcatCdjBl.alt  "SSS  ~t  0”): 

■txepyCdyBl.tl,  “rdytb  -1  /ta9/tree/prav.blMd.dld  "); 
■trcat(dy»l.tl,  /tap/tr*e/bla_Sxa.ti  -«  S  >b  9  t  ‘'>S 
■treat (dyal.tt.  "SSB  “t  0*>: 

■trcp]r(d7B2.el,  "rdyth  -1  /tap/trae/acaaal.tiff  ">; 

■treat (dyB2.al,  “-e  /ti9/trae/bla.9xa.al  •«  9  'k  9  *): 

■treat (dyaZ.*!.  *3SS  "t  0"}; 

■trepyCdyaa.tl,  "vdytk  •!  /tap/trae/taapl.Tlff  ”>{ 

■treat (dysa.tl.  "-o  /tap/trae/bia.9x9.tl  -■  9  -h  9 
■treat (dya3.tl.  "269  -t  0"); 

■trcpy(aBd.al,  "raad  -11  /ti^/trae/bla.4aBd.al  ■); 

■treat (aad.il,  "-12  /taf/trae/bla.9z3.al  -e  "): 

•treat (aad.al,  "/tap/trae/tay.aeaal") : 

■trei)y(aad.tl,  "rand  -11  /tap/trae/bl£.4aad.tl 
■treat (aBd.tl,  "-12  /tap/trac/blB.9z3.ti  -o  "); 

■treat  (aBd.tl,  "/ta^/trac/n^.taa^l"); 


■trepy(padtl,  "rpad  -1  /tap/trae/eub.taapl  "); 
•treat<padtl,  "-o  /tap/trae/Tl.dlap  -r  64  -c  64  "); 
■treatCpadtl,  "-d  0  -a  0  -J  268  -k  0"): 


/•  iBltlallca  ■lacallaBaeua  rn—aiii1  strlaga.  •/ 
- - ,/ 


■trepyCaaaa.es,  "grap  Naan  /t^/trac/atatlstlcs.cs 
•treat (BaaB.CB,  ">  /ti^/trac/ea.Baan.data"}; 

■trepy(aaaB.pa,  "grap  Haa&  /t^/trae/statlatlc«.p«  "); 

•treat (aaaa.ps,  ">  /ti^/trae/pa.aaaa.data”) ; 

•trcpy(cezT.Baa&,  "grap  Naas  /ti^/trae/Catatlatlca  "); 
atreat(eorr.Baaa,  ">  /tBp/trae/aaaix.data") ; 

atrepyCeeiT.var,  "grap  Varlaaea  /tap/trae/Catatl«tlea 
■treat (corr.Tar,  ">  /ta^/trae/rar.data") ; 

■trepyCeorr.atdaT,  "grap  Std.  /tap/trae/Catatlstlea  "); 

■treat (eerr.atdaT,  ">  /tap/trae/atdaT.data”) ; 

■trepy(eerr.aaz,  "grap  llgb  /t^>/trae/CatatlBtica  "); 

■treat (eorrjwi,  ">  /tBp/trae/aaz.data") ; 

■trepyCeorr^lB,  "grap  Low  /tap/trae/Catatlatlca  "); 

•treat (eorr^la,  ">  /t^>/trae/Biii.data"}; 

■trepyCcopy.ea,  "cp  /ta^/trae/acanal.rUf  /tap/trae/*Tlff_4atat"); 
■trepy(eepy.pa,  "cp  /tap/trae/taapl.rUf  /tatp/trae/trlff.4atat">; 
•trepy(tl.4atat,  "ep  /ti^/trae/tap.ta^l  /tap/trac/taa^l.datat")  ; 
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/tap/trM/tap.sc«Mt  /tir/trac/»e«Ml.4st«t"> ; 

•trepx(ftl.4at«t.  *cp  /tap/trae/tr«T.bift.4«tat  /tap/trM/M*ccad.4«tat”) ; 

■trepxCU.cs,  “frcp  lifb  /tap/trkc/atAtistica.ea  **); 

■trMt(hl.e«.  *>  /tiv/tru/hislt_dktA*> : 

■trcp7(hl_p*>  "frap  Elfh  /t«p/tr4e/«t%tlatica.p«  *}; 

•treat  (M_p«.  ■>  /tap/trae/hl*h_data"); 

atr^X(fal.4atat.  "ep  /ta^/tr%e/ara*.klB.4atat  /tBp/trae/baaea«d_4atat''> ; 

•trcpx(ctl.4atat,  "ep  /tap/trae/ta^l.Tiff  /t^/trac/tM^l.tatat"}; 

•trep7(eal_4atat.  "ep  /t^/trae/acaaat.aiff  /ta^/trae/acaMl.tatat") ; 

•trepyCelr.aer.  "elaar"): 

/, - - - ,/ 

/•  Cep7  taxt  laafa  tlla  to  /tap/trac/eurraat.acaaa.  •/ 

•hila(Ba4a»'f  *) 

< 

lf((fpS  ■  fopasCfiXaaCcMat]  ,  *rb"))MlUU.) 

< 

prlatf ("Error  epaBla(  XalVa",  fllaa [count]); 
arlt(l); 

> 

lf((fpj  ■  fopaa("/tap/trae/curTaat.aeana‘',  "•b”)>*annx) 

< 

prlatf  ("Error  opaalag  /tap/trae/cttrraBt.acaaa!\a"); 
azit(l); 

> 

charaetar  ■  7(ate(fpS) ; 
i<«arror(fp6)) 

{ 

printf ("Error  roadlaf  Xa!\a",  7ilaa[eeuDt]) ; 
axltd): 

} 

•hila(choraetor!*EOF) 

{ 

f pote (charaetar ,  tpl); 

17(farror(fpl}) 

{ 

prlatf  ("Error  arltiac  to  /tap/trac/curraat.acaaa!\a"} ; 
azltd); 

> 

charaetar  ■  f(atc(fp6} ; 

If (farror(fp6)) 

{ 

prlatf ("Error  raadlaf  Xf!\a",  fllaa [count]); 
azltd); 

} 

> 

f cloaa(fp5) ; 
f cloaa(fpl) ; 


/, - - - - - ,/ 

/•  Dlaplax  aa  laaga  la  Ita  original  fora  and  raaaa*  •/ 
/■  tha  fila  eurraat.acaoa  to  proTloua.acaoa.  •/ 

/, - - - - - - - - - 

•7atoB(raT.ea) ; 

•7ataa(pad3.2zS) ; 

•7ataa(dala7) ; 

•7ataB(b7ta.f ot) ; 
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< 

< 

•7»tM(dlBpla7.f»v>  i 

> 

mpamaM(*/t^/tr*e/earra8t.aeM«'‘ .  '’/tap/trac/pr«Tloii«.*eaM"> 
if(a«^l*0) 

< 

priBtt("FiX«  raa—lac  eparatioB  tS  falladlXa**); 

•zltd); 

> 

> 

lf(paaal>0> 

{ 

•*■]>  ■  raDMaC/tap/trae/pratrleua.acaaa".  "/taip/trac/eld.acMa'*) ; 
lt(aa^|aO) 

{ 

prlatf("Flla  raaaalag  eparatien  16  fatladlVa"); 
azlt(l) i 

> 

aaaparaaaMC'/t^^/trae/euzTaat.aeaBa*' ,  "/t^/trac/praTieua.BcaBa”) 
If(aaapl-O) 

< 

prlBtf  CFila  raaaBiiif  eparatlon  IT  falladlVa**): 
azlt(t) i 

> 

> 

/,— - - - •/ 

/•  fiatanaiaa  tarfat  raa(a  aa4  Aiaplap  to  acraaa.  •/ 

fer(l-0;  i<128;  i**)  atrlagCi]  ■  fUaa[ceuiit3[13: 
lan|^  ■  atrlaa<atrlB(> : 

*or(j-0;  J<5i  tatmlCj3  ■  atrlngClaagah  -  *  ♦  j3 : 

tanlCJ]  •  'No*; 
fr.talo  ■  ateKaaral): 

if <iBdaz<»0) 

{ 

priatfCNn"); 

ayataaCclr.aer) ; 

prlatf ("TargatNaRaagaNB”) ; 

prlBtfC" - \b"): 

ladaz  B  20; 

> 

prlatfCXBdNa”,  fr.lafo); 
ladaz  B  ladaz  -  1; 

ceuat  B  eoimt  ♦  1; 


- - - - - - — ,/ 

/•  Trlggar  tha  diapXay  of  targatiag  Boau.  •/ 

/, - ,/ 

if (paafBB2> 

{ 

if((fp2  B  fepaaC/ta^/trae/atarci.flag''.  •‘a"))BBiVU.) 

{ 

priatf ("Error  opaalac  /tBp/trac/atartl_flB(!\a"); 
azit(l): 

> 

fpoteCoa,  fp2); 
f cXoaa(fp2> ; 

> 
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pMt  ■  fM*  *  1: 

if((tp4  ■  (epanC/tii^/trK/ttkta.flkf''.  "r'*))>*IULL) 

< 

prlatf  ("Error  opoalaf  /ttf/tr*e/nat*.flag\»t‘‘): 
mxlt(l); 

> 

•toto.flaf  ■  (g«te(tp4); 
tclooo«p4>: 

/•  torgatlag  arata  raquaatad  by  naar  •/ 

/•  and  raaat  tba  <ila  atata.flag.  •/ 

/. - - - - - — - - — - a/ 

If (atara.flagaaen) 

( 

Btata.flag  ■  off; 

it((tp6  •  fopaaC/taip/trae/atata.flag”, 

{ 

prlatf ("Error  opaaiag  /top/trac/atata.flagiVa"); 
azltd): 

} 

fptttc(off,  fpS); 
f cloaa(fpS) ; 

if((fpi  ■  fepaaC'/tap/trac/atata.iale".  '‘r"))**>VU.) 

{ 

prlBtf  ("Error  opaalag  /tap/trac/atata.laf o\a! ") ; 
azltd); 

} 

atata  ■  fgate(fpl); 

- — - - - •/ 

/•  Dataralaa  tba  aoabar  of  laaga  traaai  to  aklp.  •/ 

/, - ./ 

if  (atata“*a*) 

{ 

lf((fp3  ■  fopasCVtaip/trac/atartl.flag",  "a"))— »W.L) 

< 

priatf ("Error  opaaiag  /tBp/trac/atartl.flagiXa") ; 
azltd) ; 

> 

fpatc(aff,  fp2) ; 
fcleaa(fp3) ; 

fgata(atrlBg,  136,  fpl); 
fgata(atrlBg,  136,  fpl); 
atap  ■  atel(atrlng); 
count  •  couBt  *  atap; 
if  ((urge  -  coiaBt)<3)  atata  ■ 
jobs  -  1; 
paaa  ■  1; 

> 

fcloao(fpl) ; 


/•  If  laat  laaga  la  saquaaca  baa  baao  dlaplayad  or  par  •/ 
/•  uaar’a  raquaat,  kill  background  precaat,  and  azlt.  •/ 

/. - - - ./ 

if  (atata“’a’  1 1  (argc-couat)*"!) 

( 

Btrcp7(aaarcb,  "pi  -auz  I  grap  putlaaga  I  grsp  -t''); 
ftrcatCaaarcb,  "  ’grap’  >  /tap/trac/job.nuabara") ; 
ayataaCBaarcb) ; 


91 


If((fp4  ■  (opMC/tiv/trae/jekjNBibarf.  "r*))— lOLL) 

< 

prlBttCIrrer  fwlf  /ta^/tr«e/Jeb_Mab«r«l\B**>; 
•zltd): 

> 

fg«t«(«trlB(,  lat.  fp4); 

f er(a^i  ■<>:  pa.valMbO  ■  •»!>([■  *  •] ; 

pa.val««U  *  *\0's 
jabl  ■  Mol(pa_v»ltt«>: 
fclM*«p4): 

■priatf(k.Aiapl^of,  "kUl  U”.  Jebt); 
■7at«B(k.*lBpl.fOT) i 

if((fpS  *  fop«B(«/tiip/tr«e/BOS.na(”.  *‘»*')>>-IULL> 

{ 

prlatf  ("Irm*  opaalag  /tap/trac/SOS.flagiXa*): 
•zlt(l) i 

> 

fputc(ea,  tp6) ; 

(cle«a(tpS) : 

priBtf(«te\n-,  'VOOT'); 

lf(JebS«0} 

< 

priatf  — - — — — - ; 

priatf  . 

priBtfC*/*  Tbit  prograa  baa  b«aa  taialsatad  aitbar*}; 
prlatfC*  ia  ra*  a/Va"); 

prlatfC*/*  poaaa  to  tba  uaar'a  raqaaat  er  baeaaaa  ”>; 
prlrt#{"tba  dl-  a/\a«); 

priatf("/a  gittaad-laagaa  for  tbla  aaquaaca  baaa  b"): 
prlatfCaaa  a**  a/Va")! 

prlatf(*/a  haaabad.  Zf  tba  program  'trac.aaav’  baa”); 
prlatfC'  BOt  a/\B«)j 

prlatfC/a  aZraady  baan  taralaatad,  pZaaaa  raponaa”); 
prlatfC"  wltb  a/\B"); 

prlstf("/a  option  'a'  to  taralaata  it  aoa.  ”}; 

prlatfC"  a/\a"); 

priBtfC"/a - «>; 

prlatf  C"-“— a/\a") ; 

} 

alaa  IfCjobbaal) 

{ 

prlatfC"/*— — -"); 
prlatfC"— a/Va") ; 

prlatfC"/*  Program  taralaatad.  Tba  raquaatad  aomb*"); 
prlatfC"r  of  */\b") : 

prlatfC"/*  laag*  framaa  to  b*  sklppad  azcaadad  tb*”>: 
prlatfC"  Boabar  */\a"); 

prlatfC"/*  of  raaalalag  ua-dlapZayad  laag*  framaa  "}; 
prlatfC"  la  tba  */\b"): 

prlatfC"/*  aaqanaaca.  Plaaa*  rapoaa*  vitb  optloa  "); 
prlatfC"  ’a’  to  */\a")j 

prlatfC"/*  taralaata  tba  program  'trac.aaau’  now. 


prlatfC"  */\b"): 

prlatfC"/*— —————— — — — — 

prlatfC"- - */Sn"); 

> 

azltCO); 

> 


/* 


■*/ 
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/•  Turgat  tracklag  loop.  •/  ' 

i 

lf(e7Cl*aaO> 

{ 

latfM  ■  0; 

lf((fpl  •  fopaaC/tap/trae/coerda.flag.l",  ■r''»a-anLL) 

{ 

pvtaCIrrar  raadlag  trea  /tBp/trac/eo«rd«^l*g.tt'’>i 
•zlt(l): 

}  _ _  _  / 

/•  Dalay  «BtlX  oaar  haa  lapattad  •/ 

/•  raqalrad  eorralatlea  paraaatara.  a/ 

taaip  ■  fgatc(fpi): 

«hila(ta^  I  aea) 

<. 

fcloaa(fpl) ; 

lf((ypl  a  fepaa(*'/ti^/«rac/coerda.flag.l*‘,  '‘r'‘>>aall)LJ.} 

< 

puta("Errer  raadlag  froa  /t^/trac/coorda.flag.ll") ; 
axitd) ; 

> 

taap  a  tgate(fpt); 

> 

lcloaa(fpl) ; 

lf((tp3  a  JopaB<*/t«¥/trac/coord*.fXag.l",  "**))aarou.) 

{ 

pttta("Errer  arltlag  te  /taqp/trae/eoorAa.flag.ll"); 
azit(l>; 

> 

f pate (off,  fp3>; 
f cleaa(fp3> : 

- — - - - 

/■  JUtrlava  lapattad  target  coordloataa  aad  optloas.  •/ 

/■ - - - — — - - — - ,/ 

if((fp4  a  fopaaC/tap/trac/eoorda.lafo,!",  "r")>aann.L) 

< 

patB("£rror  raadlag  froa  /tap/trac/coords.lafo.liNn") ; 
azlt(l) ; 

> 

fgattCatrlag,  138,  fp4); 
z.raXaa  a  atoKatrlog)  ; 
fgsts(atriag,  138,  fp4); 
y.valaa  a  atoKatrlag) ; 
fgata (string,  138,  fp4) ; 
athd  a  strlngCOD; 

- - - - - ,/ 

/•  Dotaznlaa  corralatioa  aatbod  cbosaa.  •/ 

/. - ,/ 

lf(Btbdaa>ai} 

< 

Btrepy(strO,  "Tbrasboldad  (0  or  355)"); 
strcpy(raBaaaO,  "a.”); 

> 

alas  If (atbdaa’b*) 

{ 

strcpy(strO,  "Tbrasboldad  (a/  gray-aeala)") ; 
atrcpy(raiisaaO,  "b.”}; 

> 
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•IM 

•tre^CsttC,  "Ttvth  taaplkt*  ani  ac«B«">; 
■trcpy(r«MMO.  "e.”): 

> 

ttTCfjitxO,  -Truth  taapl  «/  asMdlfiad  acM*"); 
atrep7(r«MMaO.  “d."): 

> 

alaa  lf(«tM>a'a'> 

atrcpxCatrO.  "Tkraaboldad  blaad  (0  or  SSS)"); 
atrepjCrauaaO.  “a.*): 

> 

alaa  iftatkd— •<*> 

{ 

atrepyCatxO,  "Thraakaldad  bland  (a/  gray-aeala)*): 
atrepyCraaaaaO,  “f.*)} 

> 

alaa  IfCatbd— ‘f’) 

{ 

atrcpyCattO,  "tlBaodlflad  gray-aeala  iMcaa**); 
atrcpyCraBaaaO,  "k-"): 

> 

alaa 

< 

atrcpyCatrO,  "Optical  adaptiaa  traekiaf  alaulatlon.") ; 
atrcpy<ratta»aO,  "so.*}; 

> 

raBaaa3[0]  ■  ' . ' i 
raaaMSCi}  •  'O'; 
rasaMSCS]  •  ‘O': 
raaaaaSCSl  •  '\0* ; 

fgata(atrlikg,  138,  fp4); 

lf<Btbd»'a<  II  ■tbd-v'b'  II  Bthd—’a*  II  athd— ‘f*) 

< 

factor  ■  atof(Btrlag); 
rana»a8[03  ■  atrlagCl]; 
raDaaa3[l]  ■  atrlagCS]  ; 
raaaaaSCS]  ■  striB(C33; 
raaaBa3C33  -  >\0>; 

> 

fgataCatrls^,  136.  fp4); 
alaa  ■  atrlag[03; 


/« - - - ■/ 

/•  Datacmlaa  blsartzatloa  taebalqua  choaao.  •/ 

/, - - - - - - - ./ 

atrcpyCraoaaal,  "Bosa."); 

lf(Btbd«"a>  II  Btbd— ’b’  II  athd—’a’  fl  Btbd»'f’) 
{ 


fgataCatrlag,  138,  fp4); 
bla.atata  ■  atrlogEO]; 
atrcpy(atr3,  "Scaaa  avaraga"}; 
atrcpyCraaaMl,  "aean.”); 

if  (bia.Btata»  •  c  ’ ) 

< 

Btrcpy(atr3,  "Cliaa  aagBantatioa*') ; 
■trcpyCranaaat ,  "din."): 

> 


I':' 
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l<(bUu«trt*— •*•> 

{ 

•«repy(atr3.  "LUa-by-Ha*  «»«•*•* 
■trcp7(r««*»*Xt  "lla*."); 

} 


>! 


- - - 

/•  Datumla*  if  adcar  uaad.  •/ 

- - - 

lfOrthda->C'> 

{ 

f(at«(*trlB(.  138.  fp4): 
t|ats(atrlB(.  138,  fp4): 
adgar  ■  atriBgCO]; 
if(ad<ara"*7*) 

< 

"M*#  Extraetloa"): 
atrep7(raaaMl,  "adc*.”) ; 

> 

> 


fcleaa(tp4) ; 

- - - 

/•  Sat  tha  tai^lata  aad  aeana  alxaa,  a/ 

- - - 

if<aixaaa'l*) 

< 

j.taa^latal.iiza  ■  40; 
x.taa^latal.alza  ■  84; 
jr.aeaaal.aisa  a  130 ; 
x.aeaaal.aiza  ■  192; 
pad.alxa  ■  366; 

BtrcppCatrl,  "Larga  <Ikpla64x40,  ScBal92xl20)"); 
atrcprCraDaaaS,  "1"); 

> 

alaa  if (ii*a»«'a’) 

j.taaiplatal.Bixa  ■  30; 
x.taaplatal.alxa  ■  30; 
j.acaBal.alxa  >  38; 
x.acaBal.alza  ■  60; 
pad.alxa  •  64; 

atrcpyCatrl,  “Saall  (1^1*30x20,  SeBadOxSS)") ; 
BtrcpyCranaaaS,  "a”); 

> 

alaa  IKaixaaa’a’) 

< 

j.taaplatal.alza  ■  36; 

x. taa^latal.alza  ■  42: 

y. aeaaal.alza  ■  72; 

x. acaaal.alza  ■  116; 
pad.alxa  ■  128; 

atrcpjCatrl,  "Wadiiai  (Ta«pl“42x28,  Scn"116i72)") ; 
Btrep7(ranaB«2,  ”b"): 

> 

alaa  If (alzaaa'a’) 

{ 

y. taaplatal.alza  •  30; 

x. taa^latal.alza  ■  30; 

y. aeaaal.alza  a  38; 
x.acaaal.alza  ■  60; 
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I 


pa4.*U*  ■  M; 

•trcp;(»trl,  "Adapt/S  (Thpl>Adapt,  Sca>AOxM)”>: 
>trcpy(raa— a. 

> 

{ 

X.tMplatal.aic*  ■  aO; 
s.taaplatai.ai**  "  >0: 
y.acMal.alx*  ■  930; 
x.acaBat.alx*  ■  4M: 
pad.alx*  ■  B13; 

•trepT<**i'^>  (Ikpl-ldapt,  Sca>4»»s3ao>”>: 

•trcp7tr««“3.  -f-)s 

> 


fer(«^:  ■<6:  ■♦♦> 

{ 

tMsaDO  ■  tni.eBtr[eoimt  *  1]  Dt]  : 


> 

tanaClO  -  *\0’i 
tr.lafo  ■  a«el(tax«3)i 
for(l-0:  i<3 :.!♦♦) 

{ 

- - - - — - - - ,/ 

/•  lutrlav*  tha  x-  eeordlaata  •/ 
/•  oi  targat  locatloaa.  •/ 

/, - •/ 

j  -  Oj 


ta^  a  tru.eatr  [count  -  1]  [a]  ; 
»hila(taiVl-',') 

< 

taiBl[j3  ■  taap; 

J  -  j  ♦  1: 

taaip  ■  tru.cBtr [count  -  1]  [a  <’  Jj; 

> 

tatml[j3  •  ’\e*j 

x.taxa  ■  atoi(taSBl); 
xf.tara  ■  atof(tanl); 

3  ■  3  ♦  1: 


/, - »/ 

/■  Aatrlara  tha  J~  coordlnata  •/ 
/•  oi  targat  lecationa.  •/ 
/, - •/ 


lorCfcaO;  k<7:  k*+) 

•C 

tarB3[k3  ■  tru, eat r [count  -  l3  [a  ♦  j  *10; 

> 

tara3[k]  -  'VO’; 
j.taxa  ■  atol (taxa3> ; 
j.tata  •  512  -  j.taxa; 
jf.tara  ■  atof(tai«3); 
yf.taxB  •  612.0  -  jt.tara; 
aaa+J  ♦k*21; 

latagl  ■  ((z.valaa  -  z.tara)  •  (z.valua  -  x.tara}) 
lntag2  ■  ((j.aalua  -  j.tara)  •  (y.taiua  -  y.tarm)) 
raault  ■  tqrt((doubla)  Intagl  *  (doubla)  intag2); 

if{l-«0) 

{ 

diatanca  •  raault; 

x. coord  ■  z.tara; 

y. eoord  •  y.tara; 
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s<.eeerd  •  sd.tMv; 

7f. coord  ■  ff.toxm; 
t«jr(.Bn  ■  1  «  li 

> 

/, — - - - — - - — - - - - - •/ 

/•  Ootormloa  ^athor  laputtad  torgot  coordiaotoa  a/ 
/•  corroapend  to  aa  actual  target  location.  •/ 

alaa  IfCCdlataoca  •  roault)>0) 

dlataaca  ■  roault; 
s.coord  ■  s.tara; 
j.coord  ■  y.tora: 
sd.coord  a  rf.tan; 

Tf.coord  ■  jH.tatai 
targ_auB  ■  i  a  1; 

> 

> 

lf((dlataaea  •  a0.0)>0) 

{ 

z.coord  ■  z.valua; 

J.coord  a  j.aalua; 
zf. coord  a  ((doubla)  z.ralna); 
j<. coord  a  ((double)  j.valua); 
targ.nua  a  O; 


If  (targ_BmaoO) 

< 

atrcpj(osd,  *.0"): 

> 

alee  if (targ.auB^a}) 

< 

atrcpj(ond,  *.1"); 

> 

alaa  if (targ.ouoaaS) 

< 

atrcpj(aad,  ".2"); 

> 

alaa  Btrcpj(and,  *.3"); 


- ,/ 

/•  Paai  true  target  coordiaataa  to  •/ 
/*  the  prograa  trac_uaBu.  •/ 
/, - ./ 


if((fp6  a  fopa«(''/top/trac/coorda_ljifo_2",  "a^llaagmi) 

< 

prlatf  ("Error  opaulsg  /ta^/trac/coords.lafo.2!\B”)  ; 
azltd); 

> 

fprlotf(fp6,  "ZdXoXd.afXB",  targ.Bua.  zf. coord); 
fprlatf(fpE,  "Xe.2f\Bld\a",  jf. coord,  tr.lBfo); 
f cleea(fp6) ; 

lf((fpl  a  fopaB('/tap/trac/eoorda_flag.2",  "*"))a"roU.) 

< 

prlBtf  ("Error  opoBlag  /ta9/trae/ceords_flag.a!\B"); 
azltd); 

> 

fputc(on,  fpl); 
feloaa(fpl) ; 


/, - •/ 

/•  Walt  for  uaar'a  raapoaaa  to  allow  tracklag  */ 
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/•  M  tnt*  varsva  lapattad  targat  ceerdlaataa.  •/ 

lf(targ_BWl*0} 

< 

lf((fp3  a  lepaaC/tap/trae/eoorda.flag.l”.  ar*})a"inLL> 

{ 

pri»t(("ExTor  epaalag  /tap/trae/eoorda.flag.liVa''}; 
axlt(l); 

> 

ttop  a  fgate(fp3>: 
ahila(taaplaea) 

< 

f cleBa(fp3> : 

lf((tp3  a  topaa("/tiv/tr4c/coorda.flag.l",  •*r">>aaguu,) 

{ 

prlBtf  ("Errar  opaalsg  /tap/trae/eoerda.flag.li\B'‘>  t 

axltCl) ; 

> 

taqi  a  (g«te(fp3); 

> 

fcleaa(fp3) ; 

lf((fp4  a  fopaDC/tap/trae/coorti.flag.l*',  *'«’')>aalULi.> 

{ 

prlstf ("Error  opaniag  /tap/trae/eoordB.flag.ll\B"); 
azlt(l) ; 

> 

fputc(eff,  fp4) i 
felosa(fp4) ; 

/•  Ratriava  tha  aaar'a  rasponaa.  a/ 

if((fp6  a  fepaa("/ti9/trac/coordt.liifo.l",  "r"))«airUU.) 

{ 

put*("Error  raadlng  troa  /tBp/trac/coord».iBfc.l!\n"> ; 
azlz(l) ; 

> 

taap  a  fgaXcCfpE); 
fclosaCfpE} ; 

If  (ta^a>>a>} 

< 

z.eoord  a  z.ralua; 

7. coord  a  7.Talua; 
zf. coord  a  ((doubla)  x.Taloa); 

7f. coord  a  ((doubla)  j.aalua) ; 

> 

} 

z.eoord  a  ISO  *  z.eoord; 
y. coord  a  40  ♦  y. coord; 

zf.cntr  a  zf. coord; 
yf.CBtr  a  yf. coord; 

zf. coord  a  160.0  *  zf. coord; 
yf. coord  a  40.0  ♦  yf. coord; 

/, - 

/•  Canarata  adaptiaa  taaplata  dlaanaioDa  aad 
/•  location  for  eorralation. 

/, - 

lf(aizaaa>»*  II  tlzaaa’f’) 


•/ 

•/ 
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sadf*  ■  x.cnord  •  aOO; 

■  7.C  «rd  -  M; 
lf(z«d(«  <  0> 

< 

s*d(«  ■  0; 

} 

lf(x«dc«  >  9M) 

{ 

s*df*  ■  SM; 

> 

<  0) 

{ 

7*dg*  -  0! 

> 

lf(7*dc«  >  330) 

{ 

7*dc«  ■  330; 

) 

■trcpyCaztr.vlA,  “*«rtr*et  -i  /tap/trac/acaB*l.Tltf  -o  -  "> 
aprintf (atrla^,  "'Z  Xd  -7  Xd  -*  iOO  -h  100”,  zadfa,  yad^a) ; 
Btrcat(aztr.*lz,  strla() ; 
itreat(aztr.*iji.  *  I  vlfiakat  -1  - 
8tre4t(aztr.«iB,  "“o  /ti^/trae/tap.l  -J  1  -k  0  ">; 
atrcat(aztr.»ln,  ”-d  0  -f  0  "); 

ayataaCaztr.wla) ; 


IfCCfpl  ■  J«pan<"/ta9/trae/t«p.l",  "r")>»«»UU.> 

< 

priatf ("Error  opaala(  /ta^/«rac/tKp.tf\o”>: 
azit(l) : 

> 

IgataCstrlag,  13S,  fpl); 

for  (yy  ■  0;  yy  <■  99;  ♦♦yy)  < 
for  (xz  ■  0;  zz  <■  99;  ♦♦zz)  < 

if((faeaBf<fpl,  "Xd",  Zzy tzzHyy]))— »OU.) 

{ 

prlatf  ("Error  raadlag  froo  /tBp/trac/tap.li^s") ; 
azit(l); 

> 

> 

facanf(fpl,  "X*a"); 

> 

f cl08a(fpl) ; 

tapz  ■  z.coord  -  160  -  zodga; 
t«py  ■  y.coord  -  40  -  yadga; 

/, - - - — - - - - - -,/ 

/•  Q>ack  to  aaa  if  evrraat  aalaetad  plzal  la  part  */ 

/•  of  a  targat.  •/ 

/, - ,/ 

if  (zyCtaqpz]  [ti9y)  <■  70) 

{ 

cowBt  ■  0; 
al  ■  tapy; 
bl  B  t^z; 

Cl  -  tapy; 
dl  B  tapz; 
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•hil«(comt  ■■  0) 

{ 

4l  ■  al  -  1; 
bl  ■  bl  «  1; 
cl  ■  el  1; 
dl  ■  dl  -  li 
if(»l  <  0)  4l  •  0; 
if(bl  >  100)  bl  -  lOOi 
if(cl  >  100)  cl  >  100; 
if(dl  <  0)  dl  -  0; 


lorCsz  ■  dl;  zz  <■  bl;  ^zz)  < 

IfCzytzz]  [all  >■  Tl) 

cent  ■  1; 

if(z7Czz3Cal]  >■  (zjCtaipz]  Ctanr]  *  1>) 

< 

tapz  ■  zz; 
tmpj  ■  al; 

> 

> 

> 

iorijj  “  al:  yy  <•  el;  ♦♦yy)  < 
if(zy[bl]  [yyi  >•  71) 

< 

eoant  ■  1; 

lf(zy[bl]Cyy]  >•  (zyCtiipzHt^iy]  ♦  1)) 

< 

tapz  ■  bl; 
tmpy  •  yy; 

) 

> 

> 

ter(zz  ■  dl;  zz  <■  bl;  ‘^zz)  { 
if(zyCzz][el]  >-  71) 

•C 

coznt  ■  1; 

if(zy[zz]  [cl]  >■  (zyCtapz]  [tapy]  ♦  1)) 

< 

tapz  ■  zz; 
tapy  ■  el; 

> 

> 

> 

ior(y7  •  al;  yy  <•  el;  ♦♦yy)  < 
IKzyCdllLyy]  >■  71) 

•C 

cownt  ♦  1; 

if(zy[dl]  [yy]  >■  <zy  [tapz]  [tapy]  ♦  D) 
[ 

tapz  ■  dl; 

**P7  ■  77: 

> 

> 

} 

lf((al— 0)ka(bl«-«9)ba(cl»«9)k<(dl— 0)) 

{ 

tapz  •  paimz; 
tapy  -  paray: 

> 


\C 


100 


> 

> 


/•  TiMd  beuadlaf  of  •/ 

/, - -*/ 


4l  •  t^y  -  li 

tt2  ■  0; 

bl  ■  tapx  ♦  1; 
b2  -  0; 

cl  ■  tafj  *  1: 
c3  ■  0; 

dl  ■  ta^s  *  1: 

da  -  0: 

vbila(aa-«0  II  ba— 0  II  ea— 0  II  da— 0) 

< 

if(*a  ..  0) 

< 

al  ■  al  ■  1; 

> 

a3  -  0; 
eeaat  ■  0; 
lf(al  <  0> 

al  ■  0; 
a2  ■  1; 

> 

terCxx  ■  dl:  XX  <■  bl:  ♦♦xx)  < 
iftxyCxxKal}  <■  70) 

< 

cent  B  coast  *  1; 

> 

} 

chock  B  (eeant  /  (bl  *  dl}); 
lf(chBck  >■  O.S) 

< 

a2  B  i; 

} 

l*(b2  B«  0) 

< 

bl  B  bl  ♦  X: 

> 

b2  -  0; 
coast  ■  0; 
lf(bl  >  100) 

< 

bl  B  100; 

ba  -  l; 

} 

<or(y7  B  *1;  77  <B  cl;  ♦♦77)  ( 
ifCxyCbl]  [77)  <•  70) 

{ 

coast  B  coast  *  1; 

> 

} 

chBck  ■  (coast  /  (cl  -  al)); 
lf(chack  >■  0.9)  ' 

( 

b3  >  1; 

> 

lf(c2  B.  0) 
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{ 

cl  ■  cl  «  1; 

> 

c2  ■  0; 
comt  ■  0; 
if(el  >  100) 

{ 

cl  ■  100; 
c3  ■  1; 

> 

iorlxx  •  All  MX  <■  ♦♦**)  < 

ifCsyCzx]  Ccl]  <•  70) 

{ 

eont  ■  eeant  «  1; 

> 

> 

cbaek  ■  (e«mt  /  (bl  -  dl)); 
lf(clt«ek  >-  0.8) 

•C 

c3  ■  1; 

} 

if  (da  -•  0) 

< 

dl  ■  dl  •  1; 

> 

d2  -  0; 
cewBt  ■  0; 
ifCdl  <  0) 

{ 

dl  ■  0; 
d3  ■  1; 

> 

lor(n  ■  IT  <•  ♦*J7)  •£ 

lf(xy[dl]ty7]  <•  70) 

< 

cent  ■  cent  «  1; 

> 

} 

check  ■  (cent  /  (cl  -  el)): 
if (check  »  0.9) 

< 

dS  -  1; 

> 


> 

x.coerd  •  ((bl  •  dl)  /  2)  ♦  xedge; 
7. coord  ■  ((el  *  al)  /  2)  ♦  fedge; 
pexax  ■  x.coord; 
peny  ■  j.ceord; 

x. teaplatel.elza  ■  bl  *  dl; 

y. teaplatel.eixe  ■  cl  -  al; 
if  (x.tai^Xatal.aiza  >  64) 

< 

x.toi^latal.aixe  ■  64; 

> 

lf(7.twplatal.alza  >  64) 

{ 

j.teaplatel.alxe  ■  64; 

> 

x.ralue  ■  x.coerd; 
j.Talue  *  j. coord; 
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st.eoerd  ■  ((donkX*)  (bl  *  41)  /  2)  *  s*d(«: 
Tt.ceerd  ■  ((4e>ttbl«)  (el  *  el)  /  2)  «  7*4c*; 
xt.eatr  ■  zf.ceerd; 
yt.catr  •  ft.eeerd; 

z.ceerd  >  ISO  ♦  x_CMrd; 
y.ceerd  •  40  ♦  y.ceerd; 
xX.eeerd  ■  160.0  *  sf.eeerd; 

7f.eeer4  ■  40.0  *  jf.ceerd; 


/• — - - - - - ,/ 

/•  Cei^t*  upper  left  r*  eed  j-  pixel  eoerdlaetee  »/ 
/•  for  eub-  iMfM  teupletel  end  seeael.  •/ 


x.teapletel  >  x.eaer4  •  (x.taapletel.aixe  /  2); 
T.tHipletal  ■  y.ceerd  •  (j.te^letel.elxe  /  2); 
x.aeaeel  ■  x.eoerd  -  (x.eeeDel.elxa  /  2): 

T.seeael  ■  y.eoerd  >(  j.aeaael.elx*  /  2) : 
lf(aix*— ’f  O 
{ 

x. aeaeel  ■  160; 

y. aeaaal  ■  40; 

> 

if (ad(arl>'7') 

{ 

atrepyCaztr.al,  "raxtreet  *1  /tap/tree/aeaeal.pa4.4x8 

atreetCeztr.al,  "-e  /ta^/trae/aub.aceaal 

apristfCatriat,  "-x  Id  -7  X4  ",  x.aeaeel,  y.aeaeal); 

atreet(axtr.al,  atrlef); 

aprletf (atrief,  "^a  Xd  ",  x.acaeal.aixa); 

atreatCaztr.al,  atrief); 

aprietf (atrlng,  "-b  Xd",  y.acaeal.alxe) ; 

atreetCaxtr.al,  atrlef) ; 

atrep7(axtr.tl,  "vaxtraet  '1  /tBp/trac/ta^l.ped.4x8  "}; 
atreet(axtr.tl,  "-o  /tap/trae/aub.taepl  "); 
aprietf (atrlnf,  "-x  Xd  ",  x.taepletel) ; 
atrcet(axtr.tl,  atrlec); 
aprletf(atrle(,  "-7  Xd  ",  j.taapletal); 
atreetCaxtr.tl,  atria(); 

apriatf (atrlag,  ">a  Xd  ",  z.taapletel.aiza) ; 
atreet ( axtr .t 1 ,  atr leg) ; 
aprletf (atrla(,  "-b  Xd",  x.taepletel. aiza); 
atrcBt(aztr.tl,  atrlaf); 


if(ad(ar«'7’) 

( 

atrepxCextr.al,  "adrf  -i  /tap/trac/acaoal.pad.4zB  -o  - 

atreet(aztr.Bl,  "-el  0.36  -e2  0.35  -a  9  -tl  6  -t2  8-17"); 

atreet(aztr.Bl,  "  I  aaztreet  -1  -  "); 

atreetCaxtr.al,  "-e  /tep/trac/aub.acaaal  "); 

aprlatf (atrlec,  **>  ~7  14  ",  z.acaoal,  j.aeaoal); 

atreatCaztr.al,  atrlef); 

aprletf (atriag,  "-a  X4  ",  z.acanal.aiza) ; 

atreatCaztr.al,  atrlef); 

aprietf (atriag,  "-b  Xd",  j.acaeal.siza) ; 

atreatCaztr.al,  atrleg); 

BtrepyCaztr.tl,  "adrl  -1  /tep/trac/taepl_pad.4z8  -o  -  "); 
atrcatCaztr.tl,  "-el  0.35  -e2  0.35  -a  9  -tl  6  -t2  8-17  "); 
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•trcat(«xtr.tl,  ■  I  vaxtraet  -1  -  •>; 
■trc«t(M(tr.tt.  /ti^/trae/mk.tMpl  *); 
■priBtf  (•crlBs,  **s  Xd  *•  x.tMf lkt«i> ; 
nrlaf); 

•prUtf  (•«!&(,  "-p  id  *.  y.taaplktal): 
•trMtCwCr.tl,  •trlag): 

•prt*tf(««rlas.  ■-«  Xd  *.  z.tMpl«t«l.alM) : 
•treat  (Mtr.tt,  etrlaf); 

■prltitf(atrlB(,  "-h  Xd",  j.toiplatai.siM): 
•treatCaztr.tl,  atrlac): 


> 


- - - 

/•  Data  a&d  tiaa  cta^  tka  antput  fila  aaae  a/ 
/■  to  racerd  tha  earralatlos  procaaa.  •/ 
/. - ./ 


lf(tars.BaKl-0) 

{ 

•treppCauMarj.  aaaat); 

•treat  (aoMarx,  raaaaaO): 

•treat(aaaBaz7,  raaaaal): 

•treat  (awaarx,  raaaaaS); 

•treat (auawiTX,  raBaaaS); 

•priatf  (raaaaai,  "akdlr  %•",  •tamtrj): 
ayata«(ra>iaaa<) ; 

•treat (ataaarx, 

•trepx(pletaa»a,  aaaaarx); 
lf(tars.aaa«*l) 

< 

•treat (plotaaaa.  "raBfa.arrer.i"); 

> 

alaa  If  (targ.aaa~2) 

< 

•treat (plotaaaa,  "raaga.arror.S"); 

) 

alaa 

{ 

•treat (plotaaaa,  "raasa.arrer.S"); 

> 

lf((fp6  a  fepaa (plotaaaa,  "v"})aa|\JXJ.} 

< 

ptiatf ("Error  opaalag  flla  raaga.arrer!"} ; 
azltd) ; 

> 


•trepx (plotaaaa,  aOBaarx); 

If (targ.aaBaa 1} 

< 

•treat (plotaaaa,  "raaga.locatlea. 1") ; 

> 

•!••  If (targ.aoaaaS) 

( 

•treat (plotaaaa,  "raaga,locatlao.2"} : 

> 

alaa 

•treat (plotaaaa,  "raaga. location. 3”): 

} 


ltdtpl  »  <op«a(plotMM,  -w-))— aou.) 

< 

pristf  ("Emgr  vpaaiaf  fll*  rMia.loMtlaat'’): 

> 


•treprCpXetMM,  anaMry); 

1) 

< 

■treat  (pltaaaa .  "•thar.targata .  1*) ; 

> 

■lea  If  (tars.aaBa^} 

< 

■treat (pXotaaaa,  "etker.targata.a"}: 

> 

aXaa 

< 

•treat (pXetaaaa ,  "ethar.targata . 3") ; 

> 

if((fpt  •  fepaaCplotaaaa,  ‘‘■''))nin)LL) 

< 

priatf ("Error  epaalaf  flXa  ethar.targatal"); 
•xlt(X): 

> 

•trcpyCpXetaaoa,  maam»Tj)i 

•treat<traaaar7,  raaaaaO); 

•treat(aiiaMX7,  raatHol}; 

•treat  (aomary.  raaaaa2); 

•treat (awaaxy,  raaaaaS): 

•treat (aoBary,  and); 

lf((fp3  a  fepaaCaaaaary,  "r"})""IUU.) 

< 

prXatf ("Error  opa&lag  Xa!\a*,  ■■■■ary}: 
arltd); 

> 

priatf<»Xc\B",  '\007*): 

priatfC"***  CorraXatloB  auBMiry  is  balag  racordad"); 
priBtf("  1b:  X*  aiiBBary); 

) 

dlgltl  ■  0; 
diglta  -  0; 

digits  ■  1; 

> 

if(0pta"'»'  !j  opt""'»’  II  opt~’l'  II  optaa't') 

< 

eyeXa  ■  0; 
opt  -  •■>; 

> 

old.x.taBpl  ■  z.taBplatai; 
old.y.taapl  ■  y.taa^latal; 
old.x.scaaal  •  z.acaaal; 
old.y.acaaal  •  y.aeaDal; 

/, - ,/ 
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/•  Mtriar*  Mast  aad  copy  t«  '  c«rr««t. .  •/ 

< 

prlatf CKrxw  opaslag  X«l\a*,  ftlM[coiiBt]>: 

•zttCl): 

> 

lf((fp3  *  fop«t("/tap/tr«e/e«mBt.«c«i«‘‘.  “vk'*))— KJU.) 

< 

prlBtf CbTor  opaAiac  1  /tap/trae/ettrraat.aeaMlVa”): 
•zlt(l) i 

> 

cbaractar  ■  tgateCfpl): 

If (f«rrer(fpt)) 

{ 

priatf  (“Error  roadlag  X«i\a”.  filoaCcoitat]): 
oxlt(l); 

> 

«hila (charaetar ( aEOP) 

< 

tpvte(eharactar,  fp2); 

If <farror<tp2)) 

{ 

priatf  ("Error  arttlag  to  /tap/trae/eitrraat.acnalVB"): 
azltd); 

} 

cbaranar  ■  fgatc(fpl) ; 
lf(farTer(fpl)} 

{ 

priatf  ("Error  raadlag  XaiVa",  fllaaCeooaO) ; 
azltd) : 

> 

> 

fcloaa(fpl): 
f elota(fp2) ! 


- - ,f 

/•  Coarart  laaga  data  to  VIFF  fotoat.  •/ 

/. - ,f 

•7*'ao(r2T.ca) ; 
a3ratao{r3T_pa) : 
aystao(pad_4dlapl) ; 

if(otbd-«'g>) 

{ 

»7atao(eopjr.es) ; 

•y»tao(copy_po) ; 

ByBtao(pad4ze.ca) ; 

B7Btaa(pad4z8.pB> ; 

> 


- - - 

/•  Trotkad  ta^lata  eorralatod  vltb  •/ 
/•  ttaaodlfiad  grayaeala  Bcaaa.  •/ 
- - - 


lf(athdM‘d*) 

< 

B7Bta«(cep7.ca) ; 

B7Btao(pad4ze.cB) ; 

B7Btaa(T2».old) ; 

B7Btao(blaad_al) ; 

If (bin.Btata«»’b’  |l  blB.Btata»’c’) 

{ 

B7Btao(Btat.Blblaad) ; 


lOG 


/•  IUtrt*T*  th«  MM  for  tha  scana.  a/ 

- - - ,/ 

•7«taa(Mw.ea) : 

■  fe7aa("/ti9/trae/ca^a&_4ata".  *'r*))M|OU.> 

< 

prlBtt  ("Error  epaalaf  /t^/trae/ea.Maa.datal  \b")  ; 

> 

fgata(«triJD(,  136,  fpl); 
fcleso(<pl) i 

1  -  Ts 
J  ■  Os 

ta^  ■  BtrlagCj] ; 

•Ella(ta^  I  a '  \b  ’ ) 

( 

tanil[j3  ■  atrlOfCi  ♦  j] ; 

J  -  J  ♦  li 

taap  a  strlsgd  *  J]  ; 

> 

tazalCJ]  ■  •\0*: 

tl^aa  a  atef<tam}s 

al.BaM  a  (ti^aa  a  factor)  *  al.Baaa; 


If (klB.atataaa  >  b ’ > 

( 

atrep7(bla.al ,  "rtbraab  •!  /tap/trac/corr.blaod.praT  "); 
atrcot(bla.*l,  "*e  /tap/trac/t^p.scaaal  ”>; 
spriatf (atrlag,  "-1  Xf  -»  1",  al.aaan); 
atreat(blii.al,  atrlag); 

•trcpy<rbla.al,  "rtbraab  -i  /tBp/trae/c\irr.blaDd.praT  "> 
atrcat(rbia_si,  "-o  /tap/trac/sraT.biB.4atat  ">; 
Bprlatf(atriB(,  "-u  Xf  -a  1",  al.BaaB); 
atreat<rbiii.al,  atrlag); 

a7Btaa(blB.sl); 
apataaCrbls.Bl) ; 

•yataB(g8l.4atat) ; 


ferCoaO;  a<2;  »♦♦) 

( 

laagtb  a  24; 

fer(BaO;  B<targ.Bua;  b**) 

( 

/, - ,/ 

/•  Eatrlaaa  tba  uppar  laft  coxoar  x  aad  j  •/ 
/*  coerdlaataa  of  tba  beuBdiag  ractangla.  •/ 

/, - ,f 

forClaO;  i<3:  1*4) 

< 

tar«l[i]  ■  tru.cstr [count  -  n] [langtb  ♦  i] ; 

> 

tarBl[l]  a  •\0’; 
z.taxB  a  atoi(tainl); 

1-141: 

lor(JaO;  j<3;  J44) 
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< 

tMsaCj]  ■  tz«.aitrCeonBt  •  alClaaftk  *  i  *  j]j 

> 

tMaa[J}  ■  '\0>i 
y.tM*  ■  •tei(tataa) ; 

X.tMB  ■  tX3  *  y.tasm; 
i  -  1  ♦  J  ♦  1; 


/•  ll«trl«T«  tk*  width  wad  h«i(ht  •/ 
/•  mt  tkw  hrnmdtm  rwctaafl*.  •/ 

— - - -,/ 

for(kaO:  k<2i  k^*) 

< 


twralCk]  ■  tru.cBtr[coimt  •«]  Claa(th  «  1  ♦  k  «  3]; 

) 

twnilCk]  ■  '\0': 
width  ■■  ttel(twxal): 
k  -  k  ♦  1: 

for(l-0:  1<2: 

{ 

t«ta3[l]  ■  tru.eatr  [count  Clangth  *l  «k  *1  M]; 

> 

twtaSCl]  -  >\0‘: 

hwlfht  ■  atoKtarnS): 

laafth  ■  laa^h  «i«k^l«23; 

> 


/•  Extract  true  hinarlxod  target  •/ 
/•  Iron  currant  acaaa.  •/ 
/. - ./ 


If (z.tar«!wO  kk  7.tazn!«0  kk  tarf,Bun!*0) 

{ 

forClal;  i>Bj  1") 

< 

atrcpy(eztru.al,  "raxtract  -i  /ti^/trac/t^.aesBal''> ; 
wtrcatCaxtru.al,  *  -o  /tnp/trac/tm.ract.al 
apristf (atrlag,  "-x  Ed  -y  Ed  ",  z.tan,  y.tam); 
atrcat(aztru.al,  wtrlag): 

spristf (atrlug,  "'w  Ed  -h  Ed”,  width,  height); 
etrcatCextru.al,  atring); 

BtrcpyCiBtru.al,  "Tisaert  >11  blBnk.330z499  "); 
atrcatdBtru.al,  "-12  /t^/trac/tru.rect.el 
atrcatClBtru.al,  *-e  /ta^/trac/twp.acanei  "); 
aprlBtfCatriag,  "-x  Ed  -y  Ed”,  z.tera,  y.ten); 
atreat ( iBtru.a 1 ,  atr lag) ; 

ayataa(aztru.al) ; 
ayateadatru.al) ; 
ayateaChlaadjt.al} ; 
ayataaCcai.datat) ; 

} 

/»- - - - ,/ 

/•  Extract  true  target  froa  preeleua  acese.  •/ 

/• - - - - - ,/ 

ferClBO;  Kn;  !♦♦) 

BtrcpyCextru.tl,  "rextraet  -i  /tBp/trac/te^>l.Tiff  "): 
atrcatCextru.tl,  "-o  /ti^/trac/tru.rect.tl  "); 
aprlBtf (atring,  "-x  Ed  -y  Ed  ",  z.tera,  y.teza); 
atrcatCeztru.tl,  atring): 
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■prlBtf (>trlac,  ti  -h  Xd",  vidth.  k*l(kt): 
•trcat(Mtr«.tl.  strlaf)!  .  . 

•trq^7(latx«.tt,  “Tluiart  -il  bluk.3a0s4M  '*>: 
■treat *-13  /Uip/trac/tni.r*ct.tl  *>: 
■treat (Ifttnutl.  *-■  /taf/trae/taa^l.Tltf  *>; 
■priatf (atrlas,  *-■  ti  -j  ti",  a.tatm, 

■treat (latrtt.ti,  atrlag): 

■yataaCaxtm.tl)  i 
■7at«ai(lBtni.tl}  ; 

■7at«a(ctl.4atat) : 

> 

> 

> 

IflBthd--'*'  II  Bthd— *f>  II  ■thd>-*c>) 

< 

■7itaa(r2v.eld) ; 

■7ataa(blaad_al) : 

■7ataa{blaad.tl> ; 

If (bla.«tat»a*'b'  1 1  bin.atata*>'e*) 

{ 

■7at«i{stat_alblaDd) ; 
a7ataa(atat.tlbland) ; 

/•  Xatrlara  tba  matjx  rajiua  for  tba  •caaa.  •/ 

/, - — - - - a/ 

■7ataa(aaaa.ea) ; 

lf((fpl  ■  fepaB(*/tMp/trac/ea.BaaB.data*,  "r*))*alUU.> 

< 

prlatf ("Error  opaaiag  /tBp/trac/ca.Baa&.data!\s"); 
■xlt(l) i 

> 

fgataCatrlag,  138,  fpl): 
fcloaa(fpl) ; 

i  •  7: 
j  -  0; 

taa^  >  atrlngCJ} ; 

■blla (taap ! • ’ \b ’ } 

< 

tar»l[J]  •  atrlBgCl  ♦  J]  ; 

J  *  J  *  1; 

taop  ■  atring[i  ♦  J] ; 

> 

tar»l[j]  ■  ’\0’: 

al.aaaa  ■  atof(tar>l); 

al.Baan  ■  (al.Baaa  ■  factor)  *  at.Baaa; 


/, - •/ 

/•  Ratriava  tba  aaaa  talua  for  tba  taaplata.  */ 

/, - a/ 

a7ataa(Baan_pa) ; 

if((fp3  «  fopaa("/tBp/trac/pa.Baao.data''.  "r”>>"«IfUU.> 
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prtatfClxTMr  ep«alaf  /ta|>/tr»e/p«..M«A.A«t«l\B''>; 

> 

<g«t*(atriB(.  X2S,  fp2): 
f  clM«(fp2) ; 

i  •  7; 

J  •  0; 

tMp  ■  atrlBgCJj  i 

■Xv-  '  ' 

t*x«2Cj]  *  ■trlagti  *  jli 

J  -  j  ♦  li 

t«ap  ■  atriagCl  *  J] : 

> 

tara2[J]  -  'VO'] 

tl_»aaB  ■  ate((tata2)i 

tl.MaB  ■  (tl.Maa  •  factor)  *  tl.»oaD: 


/•  Biaariaa  blasdad  laagoa  ualng  laaga  ataraga.  •/ 

— — - - - — •/ 

IfCatbd—'a'  U  bia.atata—*b') 

< 

atrepy(blB_al ,  "Tthraab  -i  /tap/trac/eorr.blaad.praT  ”); 
atrcat(bla.Bl.  “-o  /tap/trac/ti^).acaDal  ”): 
aprlBtf  (atrlag,  "*1  Xi  ~t  266”,  ai.aaaa); 
atreat(bia_Bl,  atriag); 

atrepp(bla.tl.  "rtbraab  -i  /tap/trae/prav.blaad.old  ")j 
atrcat(bla.tl,  "-o  /tt^/trac/tafa.taopl  "); 
aprlatKatribg,  It  -r  266”,  tl.aaaa); 
atreat(bia.tl,  atriag); 

apataa(bla_ai); 
apataa(blB.ti) ; 
apataaCal.datat) ; 
ayataaCtl.datat) ; 


/, - ./ 

/•  Biaarlza  blaadad  iaagat  ualng  tba  •/ 

/•  Cliaa  biaarlzattiea  tacbaiqua.  •/ 

/» - — - - - •/ 

IfCatbdaa'a’  Bt  biB.atata»'e’) 

{ 


atrep7(bla.ai,  ”Ttbrash  -i  /tap/trac/cttzr.blaad.praT  ”); 
atreat(bla.al,  ”-e  /tap/trac/bla.daad.sl  "); 
apriatt (atriag,  "-1  Xl  -t  265",  al.Baaa); 
atrcat(bia_ai,  atriag); 

atrcp7(bia.tl,  "Tthraab  -1  /tm>/trac/praT.blaBd.eld  "); 
BtrcatCbia.tl,  ”-o  /tap/trac^la.daad.tl  ”); 
apriatf (atriag,  "-1  Xt  •»  266”,  tl.aaaa); 
atrcat(bia.,tl,  atriag); 

ayataa(bla.Bl); 

B7Btaa(bla.tl); 

ByBtaa(dyBl.al) ; 

■yataaidyal.t!); 
ayBtaa(and.ai) ; 
ayBtaa(and_tl) ; 
ayataa(al.4atat) ; 

B7Staa(tl.48tat) ; 
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> 


/•  BiaarlJt*  U«a4*d  nalaf  •/ 

/•  liaa'bj'lla*  •/ 

ll»«.btB(Vttip/trae/earr.blM4.pr«T*,  */tap/«r«c/ttp.Bcae*l* ,  fkcter,  3SB,  0>: 
Iia«.blB(*/tiiV/tr«c/pr*T.bi«ad.oXd",  Ikctet.  3Se,  0>j 

■]r*twi(«1.4«tat) ; 


ifCBtbd— ‘f  } 

< 

/•  Blsarlx*  blaadad  1m(*i  ualsf  iaaf*  mvarag*.  •/ 

/, - ./ 

if (bla.stataoa ’ b ' } 

< 

■trepy(blD.ai,  “Ttbraab  -1  /tap/«rac/curr,bl*Bd.pr*T  "}; 
•tre>t(bla.il,  "-e  /tap/trac/ta^.acaD*!  *■}; 

•prlntf (atrlfif.  "-I  Xi  -v  1".  al.aaaa); 
atrcat(blA.al ,  atrlac): 

atrcp7(bin.tl,  '‘rthraafa  *1  /tap/trac/praT.blaBd.eXd  ">; 
atreat(bla.tt.  "*0  /ta^/trac/tap.taa^l  *'): 
aprlatKatrlss,  "-1  Xf  ”»  1".  tl.»aaB); 
atreat(bl&.tl.  atrlaf): 

apataaCbla.al); 

a7ataB(bla.tl) ; 

> 


/, - ./ 

/•  BXnarlza  blaadad  laa^at  uil&g  •/ 
/•  llBa-bj-llaa  aaaraga.  •/ 
/. - ./ 


alaa  If (blB.ata«a>a'a*) 

< 

Iiat.bla("/'0*p/tr*e/eurr.blmad.pr»r'',  "/tmp/trmc/tmp^fcmtl" ,  faclor,  1,  0}  ; 
llaa.bla("/tap/trac/praT.blaod.old’’,  Vtap/trac/ta^.taBpl",  factor,  1,  0> ; 

> 

/, - ./ 

/•  Bisarlza  blaadad  iaa^aa  oalng  tba  ■/ 

/•  Clisa  blnarizattloe  tachaiqua.  •/ 

/,— - - ,/ 

alaa  If (bla.a«ata»'c'} 

< 

atrcpyCbla.al ,  "rthraab  -i  /tap/trac/carr.blaad.prar 
atrcat(bln.al,  ’-o  /ti^/trac/bla.laad.al 
aprlatf (atrlag,  "-1  Xf  -t  J",  ai.Baaa); 
atrcatCbla.Bl,  atriag) ; 

atrcpjCbia.tl,  "rthraab  -1  /top/trac/prar.bland.old  ; 
atreatCbla.tl,  "-o  /tBp/trac/bia.4and.tl 
aprlatf (atrlng,  "-1  Xf  -t  1",  tl.aaan); 
atreatCbla.tl,  atrlag) ; 

ayataaCbla.sl) ; 
ajataaCbla.tl) ; 
apataaCdyal.al) ; 
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•yitMCdTBl.tl): 

•7Staa(aad.il>: 

> 

> 

< 

•trcpyCblB.*!.  "▼thraak  -1  /tar/trac/eiirr.klaad_pra*  *>; 
atrcat(bla_al,  "-e  /ta^/trae/ti^.aeaaal  "); 
aprlatf  (atrlac,  "->1  *▼  1",  •l_aaa&>; 

atrca«(bla.al,  strlag); 

atrqp7(blB.tl ,  "rtbrash  -i  /tap/trae/prav.bXaad.eld 
atreat(blB_tl.  **e  /tap/trac/tap.taapl 
aprlatf(ftris(,  "-1  Xf  -t  1",  tl.BaaB): 

Btrcat(biB.tl.  itrlag): 

strcp7(rbla.al,  ‘■▼tkraah  -i  /ti9/trac/ettXT.bltad.prav  ")[ 
■treat(rbla.sl,  "-o  /tBp/trac/arav_bin_datat  ">; 
tprlBtf (atriag,  "-o  Xf  -r  1",  al.aaan): 

■treat (rbla.il,  atrlag); 

atrcp7(rblii.tl.  "Tthraah  -i  /tBp/trae/prav.blaBd.old  ">; 
■treatCrbia.tl,  "-o  /tBp/trac/trav.bin.4atat  ••>; 

■prlatf (atrlag,  "-tj  Xf  -t  1".  tl.aaan); 

■treatCrblA.tl,  atrlag); 

a7ataa(bln.tl); 

•7a«a*<kln.al}; 

■7ataa(rbla.tl) ; 
a7ataa(rbla.al); 
a7ataa<gtX.4atat> ; 

■7at«a((tl.4atat) ; 

} 

lf(»thd—'g*) 

■C 

for(B"0;  b<2;  a**) 

< 

langtk  a  34; 

for(m^0;  B<targ.BUB;  m**) 

{ 

/, - ./ 

/•  Ratriara  tha  nppar  Xaft  eonar  x  aad  j  •/ 

/•  eoordlaataa  of  tba  bouadlng  ractaagXa.  •/ 

- - - 

for(i-0;  i<3;  !♦♦) 

< 

tarmlCi]  ■  trv.eatr  [count  -  n]  [Xangtb  ♦  i] ; 

taralCi]  •  '\0’; 
x.tan  ■  atoKtaral); 
i  •  1  ♦  1; 

for(j-0:  jO;  J**) 

{ 

tar«2[j3  •  tru.cBtr [count  -  n] [langtb  ♦  1  ♦  j] ; 

tan2[J]  •  '\0’; 

7.tarB  •  atoKtaraS); 

X-tara  •  612  -  y.tara; 
i  ■  i  ♦  j  ♦ 


/• 


•/ 
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/•  Mtrlar*  th*  vidtk  asd  kaifkt  a/ 

/•  of  tha  bovadiiic  ractaB(la.  •/ 

- - - 

ter(k-Oi  k<2:  k*a) 

tarsi  Ck]  ■  tru.estr  [const  -alClasfth  *1  ak  *23; 

> 

tarslCk]  ■  ’SO*: 

•idth  ■  atoKtaxsDi 
k  ■  k  ♦  1; 

«or(l-0;  1<2;  i**) 

tots2Cl]a';r«.catr  [count  -alUcoftb  ♦!  ak  al  adj; 

> 

ta*s2[l3  -  '\0'; 

lkai(ht  a  atei(tani2)i 

Xoaftti  -  loacth  a  i  a  k  ♦  1  a  23; 


/•  Extract  trua  blnarlcad  targat  •/ 

/•  tres  currant  aeana.  •/ 

- - a/ 

If  (x.tarslao  kk  y.tarslaO  kk 

{ 

forClai;  i>n;  1—) 

< 

atrcpyCaxtru.Bl,  "aaxtract  -i  /tBrp/trac/taf>.acaaaV‘ 
atrcat(axtn».al,  "  -o  /tsp/trae/tru.raet.*l  *•); 
apriBtf(Btrla(,  "-x  td  -jr  td  ",  x.tats,  y.taim); 
atrcat(axtru.Bl,  atrlag); 

aprintf (atriag,  "-a  Xd  -h  Id",  uidth,  baight); 
atreatCaxtn.al,  atrlng) ; 

Btrepydntru.al,  "rinaart  -il  blank.320x4P9 
atrcatdntru.al,  "-12  /tsp/trac/xru.ract.al  "); 
atrcatdntru.al,  ”-o  /tsp/trac/tap. aeana  1 
aprintf (atrlng,  "-x  Xd  -y  Xd",  x.tars,  y.tarm); 
atreat ( Intru. a 1 ,  atrlng) ; 

ayataB(axtru.al) ; 
ayatasdntru.al) ; 

} 


/, - ./ 

/•  Extract  trua  blnarlzad  targat  «/ 

/«  froo  prarloua  aeana.  a/ 

/, - ./ 

lord“0:  l<a:  !♦♦) 


atrepyCaxtru.tl,  "aaxtract  -1  /tsp/trac/tap.taapl 
atreat (axtru.tl,  "-o  /tnp/trac/tru.ract.tl  "); 
aprintf (atrlng,  "-x  Xd  -y  Xd  ",  x.tars,  y.tars); 
atreat (axtru.tl,  atrlng); 

aprintf (atrlng,  "-w  Xd  -h  Xd",  aldtb,  balgbt) ; 
atrcat(axtru.tl ,  atrlng); 

atrcpydntru.tl,  "rlnaart  "11  blank. 320x4W  "); 
atrcatdntru.tl,  "-12  /tnp/trac/tru.ract.tl  "); 
atreat (Intru.tl,  "-o  /t^/trac/tsp.taapl  "); 
aprintf (atrlng,  "-x  Xd  -y  Xd",  x.tars.  y.tars); 
atrcatdntru.tl,  atrlng); 

ayataB(axtru.tl) ; 
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> 

} 

> 

{ 

■7*tM(blud_x.tl> : 

•]ratM(bl«ad_z.«l)  1 
tyatM(ctl.4atat> ; 

•7atMi(cal.4*tat) : 

> 

•c 

Bw»p  ■  r«BaB«("/tap/trM/tap.aeaB«l".  "/tap/trae/acMal.Tlff "} ; 
lf(aaapl*0) 

•C  ■  ,  .  . 

prlatf ("Flla  raawlnf  eparatioB  falladlVa") : 

> 

aaap  ■  ranBB*("/tBp/trftc/tap.taapl'',  “/tap/trae/taBpl.Tlff "> ; 
IfCaa^laO) 

{ 

prlntf  CFlla  maalaf  eparaties  fallad'Xa") ; 

> 

> 

> 

- - - •/ 

/•  Tnia  targat  aztraetloa  algorltba.  •/ 

- — - — - •/ 

li<Btbd-a*e*) 

< 

*or(aaOj  a<2: 

< 

langtb  ■  24; 

for(a»0;  ■<aarg.BUB;  m**) 

< 

/, - •/ 

/•  Ratriava  tba  uppar  laft  coraar  z  and  j  •/ 

/*  coordlaataa  of  tba  bouading  ractaagla.  •/ 

/. - ./ 

for(i-0:  i<3:  !♦♦) 

{. 

tanl[l]  ■  tru.catr[couBt  -  a]  Clangtb  *  i] ; 

} 

taXBlCi]  a  '\0’: 
z.tara  >  atol(taral); 
i  -  i  1; 

for(J-0:  J<3:  J**) 

{ 

tazB2[j]  a  tru.cBtr Ceouat  -  a3 [laagtb  *  i  *  j]; 

} 

taraaCj]  a  >\0'; 

7.tazB  a  atoi(tara2); 

i  a  1  ♦  j  ♦  1: 


/, - ./ 

/•  Ratriara  tba  aldtb  tad  balgbt  >/ 

/•  of  tba  bouadlag  ractaagla.  •/ 

/, - ./ 

forCfcaO;  k<2:  k**) 

{ 
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tazmlDO  ■  tra.catr[ceuBt  «  i  «  k  *  2] ; 

} 

t*p»ltk]  •  ‘VO*: 
width  ■  ateKtwxal); 
k  •  k  ♦  l! 

ferd-O;  1<2;  I**} 

i 

t«rB2Cl]  ■  tru_entr  [count  *i  *k  «1  *4} ; 

> 

taca2Cl3  -  'XO*: 

kal(ht  B  atel (taru2) ; 

laafth  ■  laafth  Bl*k^l*23; 

> 


/•  Extract  trua  targat  froa  prarioua  acaaa.  •/ 

/»— - a/ 

forCiBQ;  Kb; 

< 

BtrcpyCaztru.tl,  "aaxtract  -i  /tap/trac/taapl.Tlif 
Btrcat(axtru.tl,  "-o  /tap/trac/tru.ract.tl  "); 
apriatf Catring,  "-z  Xd  -y  Xd  z.tara,  jr.taru); 
atrcatCaztru.tl,  atriag) ; 

apriatf (atr lag,  "-a  Xd  -h  Xd”,  width,  balght); 
Btreat(axtr«.tl,  atriag); 

atrcpyClatru.tl,  "TlBaart  -11  blaBk.320z499  ”); 
atrcatClatru.tl,  "-12  /t^/trac/tru.raet.tl  "); 
BtrcatClatru.tl,  "-o  /twp/trac/ta^sl.Tlff  "); 
apriatf (atriag,  "-z  Xd  -y  Xd",  z.taiw,  y.tara); 
atrcatClatru.tl,  atriag); 

ayataoCaztru.tl) ; 
ayataatClatru.tl) ; 
ayataoCctl.datat) ; 

} 

> 

} 
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> 


/•  BiaarlxatioB  algeritha.  •/ 

- - - 

< 

•y*t«i(ci.>«at) ; 
■7at«a(pa.*t>t) ; 
ayata«(MaB.ca> : 


- - 


- ,/ 


/•  Batazmlaa  saw  of  tba  earraat.aeaaa.  •/ 

if((fp4  ■  fopaB("/top/tr*e/caj>aaa.dat*",  *r">>«»WU.) 

prlBtf  ("Error  opa&lag  /tap/trac/ea^aaa.data!^”) : 
•zitCl) : 

) 

lgota(atriag,  lat,  fp4); 
f  eloaaCfpt) ; 

i  "  7; 
j  •  0: 

taop  ■  atrlagCJ]; 
ahila  <ta^  t  ■  ’  \o  ‘ ) 

{ 

tarolEj]  •  atriagCl  ♦  J3  i 
j  -  J  ♦  i! 

ttmp  ■  atrlag[i  ♦  j3: 

> 

ta*»irj3  •  'SO'; 

al.oaaa  ■  atef(tazmX): 

al.oaaa  ■  (al.oaaa  •  factor)  *  al.aaafi; 

- - - 

/•  MfeB  of  xho  pr#Tioui«scra*.  */ 

- - - 

ayataaCoaaa.pa) ; 

lf((fp6  •  fopan{"/tap/trac/pt.oaaa_data",  "r">)""»UU.) 

< 

priBtf  ("Error  opaalag  /tiip/trac/pa_oaaa_data!\a") ; 
axlt(I); 

> 

fgataCatrlag,  13S,  fp5); 

{eloBoCfpS) ; 

1  "  7; 

i  -  0; 

toap  ■  atrlagCj]; 
ahlla  (taaip ! "  ’  Vb  ' ) 

( 

tarm2[j]  ■  atriagCi  ♦  J]  : 

j  ■  J  ♦  1! 

taop  •  atrlBg[i  ■*  j] ; 

} 

taro2[j)  •  >\0-j 

tl.oaaa  •  atof(tarB3); 

tl.oaao  •  (tl.oaan  •  factor)  *  tl.oaaE; 


If (othda-’a’  Ut  bia.atataaa’b’) 


/, - ./ 

/•  Blsariza  ualng  aeon*  araraga-  •/ 


lie 


/. - ./ 

■trcpyCblA.*!,  "rthrMh  -1  /tiip/tr»c/*c«a«l.Tlff  ■>; 
■trc«t(biB_*l.  “-0  /tap/trM/tap.acsMl 
•prlBtf(«triB(,  "-1  XI  -»  268",  aUMu): 
streat(biJu*l.  «trlBc)i 

•tr97(bia.tl.  "rtbr^Bb  -I  /taf/tr*c/tm^l.rHt  ")s 

■tre*t(bU-tl,  "'O  /tt^/trkc/tap.ta^l  ">! 

»priatf(«tria«.  “-1  Xl  -»  266", 

■treat (bia_tl,  ■trla(): 

■jataaCbiB.*!) : 

■7BtM(biB_tl>  i 


- - ./ 

/•  BlBarls*  ualaf  tb«  Clia*  blaarlMtlee  tacbal^a.  •/ 

- - ./ 

lf(Btbd>*'«'  bb  bla.stM«>*‘e'} 

{ 

■trep7(blB.al,  "rtbraab  ‘i  /tap/trac/acaa*l.Tlff  ">; 

■treat (blB.al,  "-o  /tap/trae/biB.4aad.Bl  ">; 

■prlBtf (atring,  "-1  XI  ~r  266",  al.aaaii): 

■treat (bla_sl,  atrlac); 

■trep7(bla.tl,  "rthraab  -1  /tap/trac/t«a9l.Tlff  "); 

■treat (blB.tl,  "-a  /ti9/trac/bla.4aBd.tl  "); 

■prlatf (atriag,  "-1  Xf  -t  266",  tljaaaa}; 

■treat  (blB_tt,  ■»!»(); 

■7ataa(biB.al); 

■7at«a(bla.tl); 

■7ataB(d7B2.al>; 

■7at«i(d7s2.tt> ; 

•7ataa(aad_«l); 

■7at*a(aBd.tl): 

> 

/, - ./ 

/•  Blaariz*  ualag  llB«-b7-li»«  avaraga-  •/ 

/, - ./ 

if(atbd"a'a’  bb  bin.atata««'a') 

{ 

llBa_bla("/ti9/trac/aeaal.Tlff",  "/tap/trac/tap.acaoal",  factor,  255  ,  0) ; 
llaa.bia("/tap/trae/ta«pl.Tlff",  "/tap/trae/t^.taaipl" ,  factor,  256,  0); 

> 

if(atbd—'a') 

■7ataa(tl.4atat) ; 

■7ataa(a2.4*tat) ; 

nap  •  raBaaa("/Ca7/trac/tap.aeaaa)",  "/tap/trac/»caaal.Tlff ; 
if (■■apiaO) 

< 

prlBtf(”Flla  raBBBlBg  oparatlon  fallad!\D"): 

) 

■»ap  •  raoaBa("/t«p/trae/tap.taBpl",  "/tBp/trac/ta«pJ.»iff")  ; 
if  (■■ap!a0> 

< 

priBtfC'Fiia  raaaBlag  oparatioa  faiiad!\D"): 

> 

> 
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'k'  M  ‘k’) 

<  _ _ 

/•  Blaarlx*  ulsf  bcm*  *T«r«c«.  •/ 

•trep7(bla.«l>  "▼thrMk  -i  /tap/tr*c/»c«B«l.TUf  ">: 

•tremt(bia.tl,  /tap/trK/tiV.ac«a«l  *'): 

■priatfCatrlaf,  "-1  Xf  -»  1“,  •!.•••&>: 

■trcBt(klB.al,  •trlB(>i 

■«rep7(bla.tl ,  "rthrMh  -1  /tap/trae/t«i^l.alff 
■«reat(kla_tl,  "-o  /tiv/tr«c/t^>.t«iipt  ”>: 

■prlatf (atrlBf .  "-1  Xf  1”,  tl.MaB); 
atrcat(kia.tl.  atriag); 

a7ataa(bla_al) : 
a7a«<Bi(kiB.tl> : 
a7ataa(al_a.bla) ; 
a7Btaa(tl_a.kia) ; 

87BtM(etl.4atat) ; 

87atM(c8l.4Btat) ; 

} 

/».... - - - - - .......... - - - 

/•  Biaariaa  ualaf  Cllaa  biaarlsatlea  tachaiqu*.  •/ 

lf(Bth4->'b’  kk  bla.8tat*— 'eO 

< 

atrcp7(bla.al,  ‘'rtkraah  -I  /tap/trac/aeaeal.Tlff  ”>: 
atreat(bla.8l ,  /tap/trac/bla.Aaad.at  "); 

apriatf (atriac,  "•!  Xf  1*.  Bl.aaaa); 
atreat(bla.al.  atrlaf); 

Btrep7(bia.tl ,  "rthraah  •!  /t^i/trae/tM^l.alff 
atrcat(bla.tl,  *>e  /tap/trac/bla.daad.tl  "); 
apriatf (atrlas,  "-I  Xf  -»  I",  tl.aaaa); 
atrcat(bla.tl,  atriag); 

a7ataa(bla.al>; 

878taB(bia.tl); 
a7ataa(d7a2.al) ; 
a7Btaa(d7a2.tl} ; 
a7at««(aBd.Bi) ; 

87at«B<aad.tl): 

87ataa(Bl.z.blB) ; 
apataaCtl.z.bla) ; 
apataaCctl.datat) ; 

87ataa(e8i.4stat) ; 

> 

/, - - - - - ./ 

/•  Biaarlz*  aslag  liaa-bj-lla*  avarag*.  •/ 

/, - - - - - - - ,/ 

lf(«thd«a'b’  kk  bia.Btata«*’a') 

{ 

liaa.blaC/tarp/trac/Bcieal.Tlff",  "/tBp/trac/tBp.Bcnai”.  factor,  1,  0) ; 
llaa.blaC/tap/trac/tai^l.Tlff*',  "/tBp/trac/ti^.taBpl*’.  factor,  1,  0>; 

apBtaaCal.z.bia) ; 

•78taB(tl.z_bln) ; 

B7ttaa(etl.4stat) ; 
apstaaCcBl.dBtat) ; 

> 


•/ 
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/•  Cerr«l«t*  targwt  taaplkt*  with  euraat  scm*.  •/ 

/, - •/ 

lf(Mtk4l-*c'  U  ■tkdl-'d') 

•yatM(r*Mza.ca)  i 
■7at«B(p«44s>^a) ; 

> 

a7atMCpad4xt.pa)  : 

ayataaCarcr.al) ; 
ayataaCartr.tl) ; 
ajataaCatat.atl > : 
ajataalatat.aal) ; 

ajataaCpadtl) ; 


lf(nu*«0  M  dlaplajM*/’) 

< 

/, - ./ 

/•  Dlaplay  taaqalata  aad  aeaaa  attb-laa(*s.  •/ 

- — — •/ 

lf(ai*al-*f>) 

< 

ayataaCdiaplay.al) ; 

> 

ayataaCdlaplay.tl) : 
run  ■  run  *  1; 

} 

/•  Fad  avb'laafa  with  sarea  for  FTT.  */ 

/, - a/ 

lf(ai*a"’l') 

ayataaCpadSSd.Bl) : 
ayatM(pad266.tl) ; 

> 

alaa  lf(alsa"'B'  II  aisaaa'a') 

{ 

ayataa(pa464.al) ; 
ayataa(padM.tl) ; 

} 

alaa  if (alza">’B’) 

< 

ayataa(padl38.ai) ; 
ayataa(padl3B.ti} ; 

> 

alaa 

< 

ayataaCpadSIS.al) ; 

ta^x  ■  76*  -  (z.xaaplatal.aiza  /  2) ; 

tapy  a  36d  •  (y.va^latal.alza  /  2); 

atrepy(pad6I2.tl,  "rpad  -1  /tap/trac/aub.taapl  ”>; 

atreat(pad512.tl,  ”*e  /tap/trae/aub.taapl.pad  -r  612  -e  6X3  "> 

aprlatf  (atrlag,  "'d  Xd  *,  zapy) ; 

atreat(pad5X3.tl,  atrlii(}; 

apriatf (atriag,  "'a  Xd  -J  0  -k  0”,  tapx) ; 

atrcat(pBd6X2.tl,  atrlag); 

ayataaCpadSXS.tl) ; 

> 

ayataa(fft.tl>: 

ayataaCfft.tl); 
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•7K<a(caBja(.tl) : 


/, - - - - - 

/•  Tb*  lolle«ia(  ceaelvdM  tb*  corr«l«tlM  •/ 

/•  for  tb«  lull  •••rcb  sccm  optloA.  •/ 

{ 

*3: 

■  y.taaplat*!  -  3; 

x.tMiplatal.alx*  ■  z.taaplatal.alaa  ♦  •; 
j.taa(>la«al_alxa  ■  j.taa^Xatal.alaa  «  •; 

lf(a4carl->7') 

{ 

atrcp7(aztr_tl,  "aartraet  -t  /t^/trac/cai^l.pad_4aa  "}; 
atrcat(artr.tl,  ■-e  /t^/trae/aub_t«af3  "); 
apriatfCatrlag,  ■-!  M  ”,  z.taaplatal); 
atrcat(axtr.tl.  atrlaf); 
aprlatf (acrlB^,  ”-7  Id  ”,  7.taiiplatal): 
atreat(aztr.tl,  atrlaf); 

■prlBtf(atria(.  ”*•  Sd  ”,  z.zaaplatai.alxa); 

Btreat(axtr.tl,  atrlaf); 

■prlatf (atrlB(,  *-b  Xd”,  p.taapXatal.aiza) : 

8treat(aztr.tl,  atrlaf); 

> 

ifCadfar— '7') 

< 

strcppCaztr.tl,  ”*drf  -1  /tap/trae/ta^l.pad.4zS  -o  -  ">; 
atreat(aztr.«X,  ”  -al  0.3B  -a2  0.3B  -»  »  -tl  6  -t2  8  -1  7  ">; 
8treat(aztr.tX,  ”  I  aaztraet  -1  - 
atreatCaztr.tX,  ”-c  /tap/trae/anb.taapS  "); 
aprlstfCatrisf,  ”>z  td  ”,  z.zaa^latal) ; 

•treat(artr.tl,  atrlaf); 

apriatfCatriag.  ”*7  Xd  ”,  p.taBplatal); 

atrcatCaztr.tl,  atriaa); 

spriatf (atrlac,  *>«  Xd  ”,  z.zaaplatal.aiza) ; 

atrcatCaztr.tl,  atriaf); 

aprlatfCatriaf,  ”~b  Xd”,  x.taapXatal.aiza) ; 

atrcatCaztr.tl,  atriaf); 

} 


apstaaCaztr.tl) ; 

t^z  ■  3B6  -  Cz.ta^Xatal.aiza  /  3} ; 

tapj  ■  36C  •  C7.taapXatal.alza  /  2): 

atrep7CpadB13.tl,  ”Tpad  -1  /tap/trac/aub.taap3 

atrcatCpadBlS.tl,  ”-o  /tap/trac/avb.taapS.pad  -r  512  -c  B12  "): 

aprlatfCatrlag,  *-d  Xd  ”,  tapp); 

atrcatCpadBlS.tl,  atrlaf ) ; 

aprlatfCstrlac,  “«a  Xd  -j  0  -k  0”,  tapz); 

atrcatCpadBlS.tl,  atrlaf); 

apataaCpadBlS.tl); 

apataaCfft.tS); 

apataaCeomt) ; 

IfCClpl  ■  <epanC”/tBp/trac/tap.3”,  “r"))"»nn.L> 

< 

prlatf C”Error  opaalaf  /tap/trac/tBp.3!\B") ; 
azltCl) ; 

> 

ffataCatrlnf ,  128,  fpl); 
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Miat  ■  0; 

Jor  (yy  •  Oj  jry  <■  6;  **rt)  i 
ter  (zs  ■  0;  u  <■  •:  «-*sz)  < 

lt((teceBt(tyl.  "Xt",  *eort«epC*jO [yy3)>»“rou.> 

{ 

prlatf  Clrror  ree4ie(  tree  /tap/tree/tBp.9l\B”) 
eslt(l): 

> 

•enrt  ■  MZirt  *  (certeepCu]  t/y]  •  certM^txz]  [yy]) 

> 

tecaatCtpl.  *X*e">i 

> 

teleee(tpl>i 
■yet«i(eerrt«) ; 

lt((tpl  ■  fepeaC/te^/tree/tiV.S*,  **r'')>>*niU.) 

{ 

prlettCCzrer  e^ealef  /tBp/trae/tap.SiNB”): 

> 

lgat*(atrlag,  laa,  tpl); 

lor  <yy  ■  0;  yy  <•  31*i  ♦♦yy)  < 
ter  (u  ■  0;  zs  4M;  «-*sz)  < 

lt((teeaat(tpl,  *‘Xt*'.  Zeerdeta  [zs]  [yy3)>*"llVU.> 

< 

prlattC  "Error  rooZjjBg  Iroo  /top/troe/n^.SlVo") 

ozitd) ; 

) 

> 

taeoBlCtpl.  "X*«"): 

> 

lcleoo(tpl) ; 

lor  (xz  •  0;  zz  <■  9;  ♦♦  xx)  i 
zt«r[zz3  <•  0; 
ytarCzz]  ■  0; 

MgorrCzz]  ■  0.22; 

> 

polBtor  ■  0; 

topx  ■  0; 
t«py  •  0; 
porcoBt  ■  100.00; 
lor  (xz  ■  0;  zz  <■  492;  ♦♦xz)  < 
lor  (yy  "0;  yy  <■  312;  ♦♦yy)  < 
holdar  ■  0.00; 
holdar2  ■  0.00; 
cooBt  ■  0; 
aeroe  ■  0.00; 
zcaa  •  zz  ♦  3; 
ycao  •  yy  ♦  3; 

ll(cerdata[zcaa]  [yean]  >  (corcaapC3]  [3)  •  0.25)) 

{ 


lor  (exz  •  0;  cxz  <•  6;  ♦♦exx)  ( 
lor  (cyy  •  0;  eyy  <■  6;  ♦♦eyy)  { 
tzz  ■  czz  ♦  zz; 
tyy  ■  eyy  ♦  yy: 

IKcordataCtxz]  [tyy]  >  cordat*  [icao]  Cycao]} 
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i 

COWBt  ■  h 

> 

•one  ■  MXM  *  {e*rdat*Ctxi3  [tyy]  •  c»rdata[txs]  [tyj]); 

Botml  ■  c«r4ata[tzs][t77]: 

Mn2  ■  cart  fp  [catij  [eyy] ; 

BoraS  ■  carttBf  CS1C3]: 
fact  ■  1; 

tf(en«*3>  fact  ■  fact  •  •: 
lf((csxMa)  11  (cxx»i))  fact  ■  fact  •  4; 
lf((cxsMl>  II  (cxz~E))  fact  ■  fact  a  2; 
lf(ejfy~3)  fact  ■  fact  •  3; 
lf{(cyy~2)  II  <cj/»»0)  fact  ■  fact  a  4; 
lf<(eyy“l>  II  (erj^B))  fact  -  fact  a  2; 
lf((exs— 3)  **  (cyy“3))  fact  ■  fact  a  T; 

hol4ar2  ■  kol4ar2  *  (((fXoat>fact)  a  ((aorBl  -  BecB^)  a  (bdcbI  •  BaxB2))> 

> 

> 

keldar  *  (<aqrt((4aabla)hoXdar2)>  /  ((d0nMa>BMB3)>; 

if ((eowBta*0)  kk  (holdar  <  parcaat)) 

< 

Bom  ■  ((float) (zeaa  -  pazBz)); 
boz«2  ■  ((fleatXpcas  -  parap)); 

diet  ■  aqrt((de«bla)((Bonil  •  Borai)  «  (aeraX  a  Beza2)}); 
lf(dlat  <  60) 

( 

taps  a  xs  a  3i 
t^y  •  n  ♦  3: 
parcaat  ■  boldar; 

> 

> 

lf(eoaat  0) 

{ 

diat  a  0.00; 

Bozaalt  a  aqrt((doubla)Derat); 

Bozaale  a  Bqrt((do«blB)aorac); 
for  (czz  a  0;  ex>  <a  6;  aaexx)  { 
for  (eyp  ■  0;  ejrp  <"6;  aaepp)  ■( 
tzz  a  czz  azz; 
tyy  ■  eyp  ayT: 

Bozaall  a  ((doubla)cordataCtzz] [typ])  /  aeraalc; 

Beraal2  a  ((deublo)eertaa^Cczz]  [cyy])  /  aozaalt; 

Botaal3  a  Bozaall  *  aoraalX; 
diet  a  diat  a  (aoraalS  •  aoraalS); 

) 

> 

diat  a  aqrt(diat); 

If (diat  <  aagarr [point or]) 

( 

ztarlpoiatar]  a  xz  a  3; 
ptarLpoiatar]  a  yy  a  3; 

Ba(arT[peiatar]  a  diat; 
poiatar  a  O; 

for  (czz  a  1;  cxz  <a  9;  aacxz)  ( 
if (aaforrEczz]  >  Bogorr [poiatar]) 

( 

poiatar  a  czz; 

> 

> 

> 
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> 


> 


> 

} 

Mzml  ■  parax  -  ti^x; 
mx«2  •  paxap  -  ti^i 

MtaS  ■  (aeral  •  Mzal)  «  (aexaS  •  AetB3)i 
Aixt  ■  sqrt  ((daMbla)M(«3): 

for  (*x  "0;  XX  <■  tj  ♦♦  xx)  { 

Boral  ■  parax  -  xtarCxxl; 

Bexa3  ■  patay  •  ytarCxx]  i 
aeraS  ■  (aeral  •  aozal)  *  (noxaa  •  aoxa2); 
aoxaall  ■  aqrt  ((4ettbla)aoxa3) ; 
lf((Bezaall  <  diat)  tk  (aoraall  <  30}) 

{ 

tapx  a  xtarCxx] : 
tapy  ■  ytarLxz]  ; 
dlat  ■  neraall: 
parcaat  ■  SO.O; 

} 

> 


If  (tapx  >  2  M  t.-.y  >  2) 

< 

x. eoerd  •  tapx  *  ISO; 

y.  coord  ■  tapy  ♦  40; 

> 

al*a 

■; 

x. coord  •  parax  160; 

y.  coord  ■  paray  ♦  40; 
parcaat  ■  100.00; 

> 

•> 


/>.... - •/ 

/•  Tba  folloalac  1*  for  all  bat  full  •/ 

/•  flald  of  t1o«  for  aaarcb  aeaaa.  •/ 

/. - ,/ 

if(ilxo!-'fO 

{ 

ayataaCaultl) ; 
ayataaClaT.fft) ; 


/•  Oaadraat  flip  tba  carralatioa  plaaa.  •/ 

/, - ./ 

if(alxa“'l'} 

< 

ayataa(q.fllpl2e} ; 

> 

alaa  lf(ilta»»’x’  M  xlxa“>'a’) 

{ 

xyataa(q.fllp32> ; 

> 

alaa 

{ 

ayBtaa(q.fllp64) ; 

> 
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•7*taa(c2r*al} i 
•r«tM(c0rraMx)  i 

lf((tpl  ■  fep«ft("/t«p/tr4e/ux.4ktB'*, 

{ 

prlBtf  CXirer  epwlaf  /tap/trac/MX.dataiSB”}; 
•slt(0> ; 

> 

ff«ta(atrlag.  128,  fpl): 

(ClM««pl>i 

i  •  *; 

■  ■  0; 

t«ap  ■  ■trlBsUli 
vkilaCtaapia'a') 

< 

teazDO  ■  t««9: 

•  ■  ■  ♦  1; 

ta^  ■  ■trlagCl  *  >3 ; 

> 

CaaxbO  ■  *\0'; 

■pitaaCcerr  jain) : 

lt((fpl  •  fepaaC/ti^/trae/ain.data*',  "r*))"IUU.) 

< 

priatf  ("Error  epaalaf  /ta^/trac/ala.dataiVB"}; 
azlt(O); 

> 

IgataCatriag,  128,  fpl); 
teloaa(fpl>: 

1  ■  »! 

■  ■  0; 

taaq>  ■  •trlastl]; 
whila(taap!a*«'} 

< 

Ckiab]  ■  taap; 

■  ■  ■  4  1; 

tai^  ■  atrlagCl  *  ■]; 

) 

CklaCiC  -  ’\0’i 
apataBCeerrjooaa) ; 

IfCCtpl  ■  tepanC/t^i/trac/Baatt.data",  "r”))”)!!)!!) 

■c 

priotf  ("Error  opanlag  /tBp/crac/oaan.dataiXB") ; 
azlt(O); 

} 

fgats(Btrlag,  128,  fpl); 
fcloaaCfpl) ; 

:  -  7; 

■  ■  0; 

taap  atrlagCl] ; 
vhlla (taap 1 4 ' \a * ) 

{ 

OaaanCaD  ■  ^aaT! 

■  ■  ■  *  1; 

taap  •  atrlngCl  4  «] ; 

> 

Ckaaa[o3  *  '\0'; 
ayataaCcorr.Tar) ; 

if((fpl  ■  topaa("/t«p/trac/*ar.dBta" , 

( 

priatf  ("Error  opaalag  /tap/trac/Tar.data!\o''} ; 
azit(0>; 


124 


> 

fg«ts(«triD(,  128,  ipl): 
f clo**(fpl> ; 

1  •  ll: 

■  •  0; 

taap  ■  •trin([l]i 

< 

CrarDO  ■ 

■  ■  ■  *  ii 

tM9  ■  •trlagCX  *  ■]; 

> 

Crarb]  ■  'VO*; 
apataaCcexT.atdav) i 

lf((fpt  •  <opaB(*/tap/trae/8td*».data",  "r"))»“inil) 
{ 

priatf  ("Error  epaaing  /taip/trac/atdar.data! \n”> : 
azlt(O) ; 

> 

fgatB(atrlag,  128,  tpl) : 
feloao(fpl) ; 

1  ■  11: 

a  ■  0; 

t«Bp  ■  atringCl]: 

•hiXa (taap ! ■ ' \n ' } 

{ 

CatdarDO  "  taap; 

a  •  a  ♦  ti 

■  atriagCl  «  a]: 

> 

CstdarCa]  ■  '\0'; 

■XttaaCbpto.f lip) ; 

■pataaCatat.pk) ; 


/•  Kaad  corralatlon  Inloraatlon  gooaratad  bp  KHOROS.  •/ 
/, - ./ 

lf((fpl  ■  iopan("/t«p/trac/paak.eoord»_l".  "r"))“»VI.L> 

{ 

priatf ("Error  epo&iag  /ti^/trac/poak.coorda.liXB”) ; 
azit(l): 

) 

j  •  k  •  1  •  0; 

ford'O;  i<12;  i-**)  fg«ba(striiig,  i28,  tpl); 
leloso(tpl) ; 

tMip  ■  atrlngCoflaot  *  J1 ; 

*bUo(t«op!-’(’) 

{ 

J  ■  J  ♦  1: 

taa^  B  ■trlagCoftsot  *  J] ; 

> 


/«  Ratriar*  x-  corralatlon  paak  eoordiaata.  •/ 

/, - ,/ 


J  “  J  ♦  1; 

taap  a  atrisgCoftaat  *  j] ; 
abUa(taap!>'  ,') 

{ 

taralCk]  "  taaip; 

j  -  J  ♦  i: 

k  a  k  ♦  1: 
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t 


t«iif  ■  vtrlBgCoflaat  *  J} ; 

> 

tmlCk]  -  *\0'i 


- - - 

/•  lutrl***  j’  eorr*l«tioB  p«»k  coerdlakt*.  •/ 

- - - 


J  -  j  *  i: 

■  •trlasEeffaat  *  J] ; 

< 

taxaSCl]  ■  taapi 
1  •  1  ♦  1; 

J  ■  J  ♦ 

■  atrlBcreltaat  *  JJ  > 

> 

tar»2Cl3  ■  *\0*i 

- - - 

/•  Coi^ttta  B«v  tar(«t  loeatloa  coordlaataa.  •/ 

/, - ./ 

z.paak  ■  atol(tanl): 
j.paak  ■  atol<tarB2); 
torim^;  ■<6;  taralW  •  '0*; 

fer(a^;  ■<6j  ■♦♦)  tatmaW  ■  ’O'; 

/•zf. coord  a  ((doubla)  z.eoord);*/ 

/•yf.eoord  •  ((doubla)  y.coord);*/ 

z.eoord  ■  z.eoord  ♦  (z.paak  •  (pad.aiza  /  2)): 
y.eoord  ■  y.eoord  ♦  (y.paak  -  (pad.aiza  /  2)); 

l.tmmp  •  ((doubla)  pad.aiza  /  3.0); 

zf. coord  ■  zl.coord  ♦  ((doubla)  z.paak  -  i.taap); 

yt.coord  •  yl.coord  *  ((doubla)  y.paak  -  l.taap); 

> 


- - - 

/•  Caaaraca  adaptiaa  taatplata  dioauaiona  and  •/ 
/•  locatlOB  for  eorralatiou.  •/ 
- - - 


lf(aiza«"’a’  II  aizaaa’f') 

< 

zadga  ■  z.eoord  -  200; 
yodfa  ■  y.coord  -  90; 
if(zadsa  <  0) 

< 

zad^a  •  0; 

} 

if(zadca  >  308) 

< 

zad{a  ■  398; 

> 

lt(yadca  <  0) 

{ 

yad^a  a  0; 

> 

if(yadca  >  220) 

< 

yad^a  a  220; 

> 

atrcpy(aztr.aln,  "Taitract  -i  /top/trac/acaDal.Tlff  -o  -  ") 
aprintf  (atriag,  *'-x  Xd  -y  Xd  -a  100  -t  lOO",  ladga.  yadga) ; 
atreatCaxtr.wln,  atring) ; 
atrcat(aztr_«lo,  "  I  Tiff2»at  -i  - 


120 


•treat (Mctr. via.  "-o  /tap/trac/tm>.i  -J  1  -b  0  ■>; 
•treat (aztr. via,  "-4  0  -f  0  "); 

■y*t«i(artr.vla) : 

lf((fpl  •  l*paa("/tap/trae/ti^.l’',  “r"))--*!!!!,) 

< 

prlatf  (“Error  epaalac  /taip/trae/aip_ll\a”>; 

•zltd): 

> 

<gvtt(atria(,  13S,  fpl): 

tor  (yy  ■  0;  yy  <•  W;  ♦♦yy)  < 
lor  (ax  -  0;  xz  <■  99;  ♦♦xx)  { 

iKdacaaldpl,  “X4".  axy[xx3  tyy3»“-roLl.) 

( 

priatt  (“Error  roadiag  troo  /tup/trac/tap.KVB*); 
•xlt(l) : 

> 

> 

tacaatdpi, 

> 

tcloaadpi) ; 

xmpx  •  z.coord  •  160  •  xo4g«; 
t«py  ■  y. coord  -  40  •  yodga; 

- - - 

/•  Chock  to  aao  11  airraat  aalaetad  plzol  la  part  •/ 
/•  ol  a  targat.  •/ 

- - - 

ll(xy[tvyx]  [t^y]  <■  70) 

< 

covat  a  0; 
al  ■  tapy: 
bl  a  tapx; 
cl  ■  taipy; 
dl  a  tapz; 
vhlla(coviit  aa  0) 

i 

alaal-l; 

bl  a  bl  ♦  1: 

Cl  a  cl  *  1; 

dl  a  dl  -  1; 

IKal  <  0)  al  a  0; 

IKbl  >  100)  bl  a  100; 

IKel  >  100)  Cl  a  100; 

IKdl  <  0)  dl  a  0; 


ler(zz  a  dl;  xz  <•  bl;  ♦♦zz)  ■{ 
iKzytzzKal]  >a  71) 

{ 

covat  a  1; 

IKzyLzz]  [al]  >a  (xy[taipz]  [tvpy]  ♦  1)) 

{ 

tapz  a  xz; 
t«py  a  al; 

> 

} 

> 
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<er(]rx  •  al;  77  <■  el;  ♦^)  < 
lf(B7Cbl][j7]  >■  71) 

{ 

coast  B  1; 

lf(z7[bl]C77]  >•  (B7[tiVz3CtiV7l  ♦  1>> 

{ 

Capz  ■  bli 
•  Tti 

> 

> 

> 

<er(zz  -  dl;  zz  <■  bt;  ««zz)  { 

If  (z7Czz]  [el]  >"  71) 

< 

coast  ■  1; 

if(z7Czz]  [cl]  >B  (Z7[tavz]  [tap7]  *  1)> 

tapz  ■  zz; 
ti^>7  ■  eli 

> 

> 

} 

for(77  ■  al;  77  <■  el;  ♦♦77)  { 
lf(z7[dl][n]  >•  71) 

< 

coast  ■  1; 

lf(z7[dl]  [77]  >■  (x7[t«pxL  [tspy]  ♦  1)) 

i 

tapz  B  dl; 

*«py  •  77! 

> 

> 

} 

lf<<alBBO)*Jt<blBB»*)*t(clB-W)tt(dl»BO)) 

< 

tapx  B  pazsz; 
tap7  B  parsy: 

> 

} 

> 


/, - ./ 

/•  Flsd  bousdisc  box  of  target.  •/ 

/, - ./ 


al  B  tapy  -  1; 
a2  B  0; 

bl  B  ta^x  *  1; 
b2  B  0; 

el  B  tapy  ♦  1; 
c3  B  0; 

dl  B  tapx  -  1; 
d2  B  0; 

abllaCaSBBO  II  b2B«o  1 1  cT-bO  II  d2B-0) 

< 

lf(a2  B.  0) 

{ 

al  B  4l  -  1; 

> 

a2  •  0; 
coast  ■  0; 
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if(U  <  0) 

< 

al  ■  0; 
a3  ■  1; 

> 

fer(zz  ■  dX:  X*  <■  blj  ♦♦xx)  < 
ifCxyCxxjCal]  <■  TO) 

{ 

eowBt  -  cent  *  Is 

> 

> 

eh»ck  ■  (eorat  /  (bl  ~  dl)); 
ifCcbaek  >-  0.0) 

b3  ■  1; 

> 

lf(b2  --  0) 

{ 

bi  -  bl  *  1; 

) 

b2  •  0; 
cent  ■  0; 
if(bl  >  100) 

{ 

bl  -  100; 
b2  -  1; 

) 

Jor<yy  ■  al:  yy  <•  el;  ♦♦yy)  < 
if<xy[bl]Cyy]  <-  TO) 

< 

cent  ■  cent  *  1; 

> 

> 

chack  ■  (coast  /  (cl  ~  al)); 

If (chock  >■  0.9) 

{ 

b2  -  1: 

) 

if(c2  —  0) 
cl  o  cl  *  1; 

> 

c2  -  0; 
coost  ■  0; 
if (cl  >  100) 

{ 

cl  -  100; 
c2  ■  1; 

> 

for(xx  ■  dl;  xz  <•  bl:  ♦♦xx)  { 
if(xytxx][cl]  <■  TO) 

< 

cent  ■  coost  *  1; 

> 

) 

chock  •  (coost  /  (bl  ■  dl)); 

If (chock  >•  0.9) 

( 

c2  ■  1; 

} 

lf(d2  -■  0) 

( 
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dl  •  41  '  1: 

> 

43-0; 
comt  ■  0; 
if(41  <  0) 

< 

41  -  0; 

43-1; 

> 

ier(n  -  *1;  yy  <■  ♦♦yy^  < 

if(x7C41][7T]  <•  w 

{ 

cent  -  cent  -  1; 

> 

> 

cheek  -  (cent  /  (el  •  el)}; 
lf(cheek  >-  0.0) 

( 

43-1; 

> 


> 

s.eeerd  -  ((bl  ♦  41)  /  3)  ♦  sedc*: 
y.coerd  -  ((el  -  el)  /  3)  «  yedgc; 
pecaz  -  x.ceerd; 
peray  -  y.coerd; 

x. tei^letal.clze  -  bl  *  dl; 

y. ta^letel.clze  -  el  *  el; 

If  (z.teapXetel.slxe  >  M) 

( 

z.tecplatel.aljce  -  M; 

> 

lf(7.tnpletel.cixe  >  *4) 

< 

j.teepletal.slza  -  64; 

> 

z. telue  -  z.eoerd; 
jr.Telue  -  y.coerd; 

zf.ceerd  -  ((double)  (bl  *  dl)  /  3)  a  zedge; 
yf .coord  -  ((double)  (cl  ♦  el)  /  3)  ♦  yedgc; 
zf.catr  -  zf .coord; 
yf.eatr  -  yf  .coord; 

z.eoerd  -  160  *  z.eoord; 
y.coerd  -  40  ♦  y.coord; 
zf.coerd  ■  150.0  *  zf.eoord; 
yf. coord  ■  40.0  e  yf. coord; 


> 


/. - ./ 

/•  Conpute  upper  left  z-  end  y  plzcl  coordicetec  •/ 
/»  for  eublBegee  teaEpletal,  eceBal,  eud  eub-dlepley.  ■/ 
/. - ./ 


x. teapletal  -  z.eoerd  -  (z.toe^letal.elzc  /  3); 

y. taapletal  -  y.coord  -  (y.te^letel.eize  /  3); 

z. ecenel  ■  z.eoord  *  (z.eceael.elzc  /  3); 
y.eeoaal  ■  y.coord  -  (y.ecenal.eiza  /  3); 
ifCeize— ’f  ■) 

{ 

z.aeeacl  ■  150; 
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■  40; 

) 

z.di*pla7  ■  XM; 
j.dliplaj  ■  40: 

Z.dl«pl47.*U*  •  40»; 
y,4l»pl»T.»i**  ■  530; 

•trcpyCastr.sl.  "aartraet  »l  /taip/trac/acaaal.pBd.4zS  ■); 
•treat (aztr.al,  "-a  /tap/trae/aub.acanal  ")j 
•prUtf(atrla(.  «-*  Xd  -7  Xd  ",  *.aea»al.  y.acaaal)! 
•treat(aztr.Bl.  atrlac); 

•prlat<(atria(.  Xd  *,  z_acaaal.aixa): 

•trcatCastr.al,  atriac): 
aprUtf(atrlas,  "-k  Xd".  y.aeaaal.aisa); 

■treat (aztr.al.  atriaf): 

•trcp7(astr.tl,  "aartract  -1  /t«p/trac/tai9l.pad.4z8  ">: 
■treat  (aztr.tl,  "-o  /ta^/trae/rab.ta^l  •*); 

■priatf (atriaf ,  "'X  Xd  ",  z.taaplatai) ; 

■treat(aztr.tl,  atriaf); 

apriatf  (atriaf ,  "'y  Xd  *,  y.ta^latal); 

atreat(axtr.ti,  atriaf); 

apriatf (atriaf ,  Xd  "i  x.taa^Xatal.aixa) ; 

atreat(aztr.ti,  atriaf); 

apriatf (atriaf ,  "'k  Xd".  j.taaplatai.aiza); 
atreat(aztr.ti,  atriaf); 


if(adfar— *7*) 

atrep7(aztr.al,  "adrf  -i  /tap/trae/aeaaal.pad.dzB  -e  '  *•); 

atreat (aztr.al I  "•al  0.36  *a2  0.36  -a  9  -tl  6  “t2  8  -I  7  ") ; 

atrcat(aztr.al,  *  I  taxtract  -i  -  "); 

atreat  (aztr.al,  "-o  /tap/trac/aub.aeanal  ••): 

apriatf (atriaf ,  "-z  Xd  -7  Xd  ",  z.acanal,  y.acaaal); 

atreat(aztr.al,  atriaf); 

apriatf (atriaf ,  "-a  Xd  ",  x.ecaaal.atza); 

atreat ( aztr.a 1 ,  atriaf) ; 

apriatf (atriaf ,  "~k  Xd",  y.aeaaal.aiza); 

atreat (aztr.al,  atriaf); 

atrep7(aztr.tl,  "adrf  -i  /tap/trac/taapl.pad.dze  -c  •  "); 

atreat (aztr.tl,  "-al  0.36  -a2  0.35  -a  9  -tl  6  -t2  8-17"); 

atreat (aztr.tl,  "  I  aaztraet  -1  -  "); 

atreat  (aztr.tl,  "-o  /ti^/trae/aub.ta^l  "): 

apriatf (atriaf ,  "-z  Xd  ",  z.taaplatai); 

atreat ( aztr .t 1 ,  atriaf) ; 

apriatf (atriaf ,  *-y  Xd  ",  y.taaplatal) ; 

atreat ( aztr .t 1 ,  atriaf) ; 

apriatf (atriaf ,  "-a  Xd  ",  z.taaplatai. aiza): 
atreat (aztr.tl,  atriaf); 
apriatf (atriaf ,  "-h  Xd",  y.taaplatal.aiza); 
atreat(aztr.tl,  atriaf); 


> 

atrep7(aztr_aub,  "vaztraet  -i  /tap/trae/pad.dzS.diapl  "); 
■treat ( aztr. aub,  "-o  /tap/trae/aub.diapl.d«ta  "); 
apriatf (atriaf ,  "-z  Xd  ",  z.diaplay) ; 

■treat(aztr.aub,  atriaf); 

apriatf (atriaf ,  "-y  Xd  ",  y.diaplay) ; 

atreat (aztr.aub,  atriaf); 
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0priBtt(rtriaf.  Xd  ■,  B.dlBpla7.alM} : 

•treat  (wctr.mib,  •triag); 

•prlBt((atrla|;.  “-h  Xd",  p.dlaplay.eUa) : 

•treat (axtr.rab,  atrlaf); 

•7at*a<«ztr.ettb> i 

•yataaCaxtr.eroaa) ; 

cent  *0; 
xpnt  "0; 

7P«t  •  0: 

zlaa  •  Mi 
ylaa  ■  Mi 

tape  ■  z.eaerd  '  IMi 

tap7  ■  y.eaord  -  40i  ' 

lf(tapz  <  26)  * 

{ 

zpat  ■  26  ~  ti^z; 

Bias  ■  M  *  zpat; 
coast  ■  1; 

> 

lf(tiqiz  >  474) 

< 

zlaa  ■  M  *  469  *  taps; 
eeaat  ■  ii 

) 

lf(ti97  <  26) 

< 

Tpat  •  26  -  tap7J 
ylaa  •  M  -  jpnt; 
eeaat  ■  1; 

} 

if(tap7  >  295) 

{ 

ylaa  ■  M  -  320  ♦  t^y; 
eeaat  ■  1; 

) 

if(eoant*"i) 

{ 

strep7(e«t.ereas ,  "aaztract  -i  /tup/trac/eroai.dat*  ") : 
•treat ( cat. croas,  *-o  /tip/trac/ croaa.dat  "); 
aprlatf (atrlac,  "-z  Xd  ",  zpat); 

■treat (cat.erosa,  atrlag) : 

■prlstf (atrlag,  "-y  Xd  ",  ypat) ; 

■treat (cut.erosa,  atriag) ; 
tprlatfCttriag,  "-a  Xd  ",  zlaa); 
atrcatCeat.eresa,  tiring); 

■priatf (■trlng,  "-h  Xd  ",  ylaa) ; 

■treatCcat.crea*,  atrlas) ; 

■yataaCcut.creaa) ; 

> 

zadga  ■  tapz  ■  25  *  zpat; 
yad^a  •  ti^y  -  25  ♦  ypat; 

IfCcoaat  ■■  1) 

< 

tprintf(ttrlng,  “aped  -1  /tmp/trte/erott.dmt  "); 
■trcpyCpad.ereas,  ■trlac); 

■treat (pad. croa* ,  "-o  /tap/trae/eroaahair  *r  320  -e  499  "); 
■prlatf (atrlag,  "-d  Xd  ",  yadga) ; 

•treat (pad.eroaa,  atrlag); 

■prlatf (atrlag,  "-a  Xd  -j  0  -k  0  ",  zadga); 

■treat (pad.eroaa ,  atrlag); 
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> 

< 

•prlBtf  (•»!»(.  "vpad  -i  /tap/trae/creaa.Aata  ■); 
•trcp7(pa4.ere««,  atrlBc); 

atrcat(pad.creaB,  ■•a  /tap/trac/eraaakalr  -r  Sao  -c 

aprUtf(atrU«*  ^  ”•  7*^*): 

atrcat(paA.craaa,  airiaf)*, 
apri»tf(a«rl»c.  "-a  Id  -J  0  -k  0  •*,  sad(a>: 
atreat(pad.eraaa.  atrlaf); 

> 

a7ataa(pad.ereaa) ; 

atarep]r(add_eraaa,  "vadd  *11  /tap/trac/auk.dlapl.data  ‘ 
atrcat(add.eraai.  *-12  /ti^/trac/eraaahalr  *): 
atreat(add_eraaa,  "-o  /tap/trae/aub.diapl.caBT*) ; 

a7ataa(add. Croat) ; 
ayttaaCbpta.aub) ; 


/•  Ceaputa  a&d  diaplay  atatiatleal  lafoxaatioa  aboaa  •/ 
/•  tha  OB*geiBf  adaptiva  eerralatioB  precaaa.  •/ 

7er<a>0:  acd;  m**)  tani2CB}  ■  trtt.estr[coi»t]Di3: 
tarB2[iO  a  *\0' ; 
tr.lafa  ■  atol(«aza2); 

if(targ.BiaaiaO) 

< 

ferdaO:  l<targ.BiM;  1**) 

< 

— -•/ 

/a  lutriaaa  tba  s-  eoerdlBata  •/ 

/•  of  targat  loeatlOBt.  •/ 

J  a  0: 

taap  a  tru.eatrCcoont]  &0 ; 
obllaUaatpl-' ,') 

< 

taXBlCj]  a  ta^; 

J  ■  J  ♦  1: 

taap  a  tru.CBtrCeaoat]  Ca  *  ; 

> 

talBlCj]  a  .\0': 

z.BUBb  a  acoKtaml); 

xl.auab  a  ((doubla)  x.Boab  *  0.0} ; 

J  -  J  ♦  1; 

/, — - - - — ,/ 

lUtrioTa  tba  p-  coordlsata  •/ 

/•  of  targat  locatloaa.  •/ 

far(ka0;  k<7;  ka^) 

< 

tarB2[k]  •  trB.cBtr[cooat]  [a  a  j  *  k] ; 

> 

tani2tk]  a  >\0’: 

p.Biiab  a  atel(tarB2); 

pf.BUBb  a  ((doubla)  y^nab  -  0.0); 

B-aajaka21: 

} 

a7ttaa(ca_pad4x8) ; 
t7ataa(pt.pad4x8> ; 


4»*  a) 5 


>{ 
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< 

prlatf  ("\a**} ; 

•yatMCclr.acr) ; 

yr  l»tf  (  ) ; 

priatfC — COMCUTXOI  STATZSncS:  *); 
priatf(*ta.wiBb«r  -  X*  .  na.Biw}: 
priBtf("Tar(«t.a«Mb«r  ■  tA  — xur^jumii 
yrlatf(" - V**)j 

yrlatf  (”Tt'«ekla(  Mathod:  l'37.37a*,  atrO); 

yrlBtf ("Xait  Hiadoa  Slaa:  l-sa.SaaXa”.  atrl): 
yrlatf  (*'na'aahel4  Tackalqna:  107. YTa".  atr3>2 
prtatf(''lkraakel4  (actor:  t*.2(  (actor); 
prlat((''aboaa  cooputa4  tkroahol4\B\B*'> ; 

prlat((''Tart  Corralata  *); 
prlat((*  Trua  Track  Err  Path"); 

prlBt((‘'  CorralatioaXa*): 

prlat((*'MB(a  TarK.CBtr  Tarc.Catr") ; 
prlat((''  Error  (Dagraa)  ErrerVo”); 


priat(("— — 

prtBt(  <  *- — •*— — . 
prlat(  — ———.—..a) . 

priBt(  ; 

la4ar  ■  IS; 

> 

aa^  a  ro&aao(''/top/trBc/raa47.44lBpl‘'.  "/top/trac/POV.dlap)”) ; 
l((aaap!aO} 

< 

prlat((''FUa  raBaolac  eparatloB  tl  (ailaSiVa”): 

) 

} 

alaa  l((tar(_BaBaa4) 

{ 

aaap  ■  ranaoa(”/t^/trac/raad7.4dlapl'*,  "/ta^/trac/FOV.diapl") ; 
i((aoap!aO} 

{ 

prlatTCFll*  raaaolag  oparatloa  (2  (BiladiXa”) ; 

> 

KdadazaaO) 

{ 

ppiat(("\a") ; 
ajataoCclr.acr) ; 

priat(("— — — — — — — -\b")  : 

priat(("Targ  CorralataXa") ; 

prlatFCRaag*  Tarf.CatrNa" ) ; 

prlBtl(" - - — - - “Va")  ; 

iadaz  ■  19; 

) 

> 

/, - ,/ 

/*  Display  corralatad  targst  coordlaatss.  •/ 

/, - ./ 
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4I^ 


II  (x.ta(a«K)  M  y.tatsMO)) 

< 

priBtfCXUXS.lf .XS.lf*.  xx.iMic,  zt_p*ak.  yf.pMk); 
priatf ("Xb"): 
iBdM  ■  iBdu  •  1: 

> 

< 

- - - ,/ 

/•  nip  r.tm  to  adjttst  for  di«arMt  eoerdlBata  a/ 
/a  ayataa  a*4  radaea  saw  targat  eoartfiaataa  fre«  a/ 
/a  a  rafaraaca  of  400sW>0  ta  S30i4M.  a/ 

/a-~-~— — - — - - - — - ~-a/ 

7.a«aab  ■  Sia  •  p.aaab; 
x.paak  a  x.eoerd  -  1(0; 
p.paak  a  p.caard  •  40; 

7f.B«Bb  a  612.0  -  ]rl_aaBb: 
xf.paai  a  zf.eaord  •  160.0; 
pf.paak  a  pt. coord  •  40.0; 

/. - ,/ 

/•  Calcttlata  aacaltuda  of  traeklag  arror.  a/ 

fralaal  a  {<zf.paak  •  aa(.aBBb)  a  (zf.paak  '  rf.Buab>>: 
faalua2  a  ((pf.paak  -  yf.Buab)  •  (pf.paak  •  pf.aaab)); 
raaalt  •  aqrt(fTalaal  *  taaltta2): 
arror  a  rasult; 

lf(BlBOta*f>} 

{ 

pareaBt  a  o.O; 

) 

/,— - - - - — — — ....... — - •/ 

/•  Dataxalao  tba  dlractloa  of  tha  track  arror.  •/ 

/, - - - »/ 

fralaal  a  xf.paak  •  sf.CBtr; 
faalaa2  a  pt.paak  -  pf.eatr; 


If  ((xf  jauBib  '  xf.paak)>0.0  44  (pf.auab  -  jf _paak><0.0) 

fvalual  a  xf.BBBb  -  xf.paak; 
faaloaa  a  jt.paak  -  jf.auab; 
raault  a  ataB2(fTalna2,  faalual); 
aagla  ■  -160.0  *  160.0  a  (raault  /  pla); 

> 

alaa  lf((xf.BWb  -  xf.paak}>0.0  44  (pf.auBb  -  pf .paak)>0.0) 

< 

faalual  a  sf.Biab  -  xf.paak; 
fvalaa2  a  pt.auab  -  pf.paak; 
raault  a  ataB2(fTaluo2.  faalual); 
aagla  ■  160.0  -  160.0  •  (raault  /  pla); 

} 

alaa  lf((zf.atab  -  xf.paak><0.0  44  (pf.auab  -  pf.paak)<0.0) 

•c 

faalual  a  xf.paak  -  xf.auab; 
fvalua2  a  pf.paak  •  pf.auab; 
raault  ■  BtaB2(fTalBa2,  faaJual); 
aagla  ■  -160.0  •  (raault  /  pla); 

} 

alaa  lf((xf.auBb  -  xf.paak)<0.0  44  (pf.auab  -  pf .paak)>0.0) 

< 

fvalual  a  xf.paak  -  xf.auab; 
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■  BtaB2«T*ltt*2,  tTklMl); 

Mfl*  •  IM.O  •  /  pi«>: 

> 

lf((z2.BiMb  •  zf_p««k}>0.0)  aacl*  ■  IM.O; 
lf((sf^iBb  -  xt.p«ak)<0.0>  •agl*  ■  0.0; 
if((7f.B»ib  -  7<.p«ak»0.0)  ia(^*  *  *0-0: 

l<((jf.Bwb  -  7f.p«Bk)<0.0)  BBsl*  •  otO.O: 

BBgl*  ■  BM.9; 

- - - •/ 

/•  tlBpXmj  cerralBtleB  atatlatlea  Co  acraaB.  •/ 

- - a/ 

prlatfCZMU.K.tS.lf*,  tr.lBfa.  xf.paak.  rf.paak); 
priatf("Xa.t<.XB.lfXS.3f*,  z<_Biiab.  arrar); 

prlBtf (*'X0>tfXS*3f\a‘*,  aafla,  parcaat); 

.iBdaz  a  iBdaz  -  1; 

/•  haeerd  eerralatlOB  auaaary  to  a  flla.  •/ 

/. - ./ 

if (tiaaiaaO) 

< 

f  priBtf  (fp3 ,  —————— — - — — - —  «) ; 

fpriBtf(fp3.“ - COlWEUTIO*  STATISTICS  SUIOU»">! 

fprlBtf<fp3."Y - 

fpriatf  (fp3," - ~-\b\b")  ; 

fprlBtf(fp3,''TraekiBg  Hathod:  X-d0.40a",  atrO)  ; 

fpriatf (fp3,*'UiBdoa  Slza:  {•40.40a\a*',  atrl); 

fprlBtf  (fpSi'IlBarizatlaa  Tachalqtia:  X-d0.40a**,  atr2}  ; 

fprlBtf(fp3,‘'ltaB  luBbar:  X-S.SaXa".  run.auB); 

fpriatf (f p3 , "Thr aabeld  Factor :  X~40 . 2f " .  f  actor) ; 

fprlatf(fp3,''Targat  loabar:  XdNBXB”,  tars.Bua); 

fpriatf (fp3 I "Data  Foiaat : \b\b") ; 

fprlatf(fp3,  "MICE,  X-PEAX  COM,  T-PEAX  CORK.  ’■); 

fprlatf<fp3,  "X-TKDE,  T-IllUE.  TRACX  ERROR,"); 

fpriatf (fp3,  "ERROR  PATH  (DEGREES),  CDRRELATIOV  ERRORXaNn"); 


f  priBtf  (fp3," - ") 

fpriBtf(fp3," - ") 

fprlntf(fp3," - \B\r") 


tlaaa  ■  tlaas  *  1; 

> 

/, - - - ,/ 

/•  Vrita  coaiputad  atatlatlca  to  fila.  •/ 

/, - - - - - — ./ 

fpriatf(fp3,  "X6dX6.lfX8.If",  tr.lafo,  zf.paaA,  pf.paaA); 

fprlBtf(fp3,  "X6.1fX8.1f",  zf.BUBb,  pf.auBb); 

fpriatf (fp3,  "X8.2fX9.1fXf .3f\B",  orror,  aagla  ,  parcaat); 

fpriatf (fp6,  "X6dX8.3f\a",  tr.lafo,  orror); 

fprlBtf(fp7,  "X6dXDdX9d\B" ,  tr.lafo,  z.paaA,  j.poaA); 

fpriatf (fp8,  "Xd  ",  tr.lafo); 
for  (z*  ■0;  XX  <•  9;  ♦♦  zz)  { 
diat  ■  30.0; 

forCyy  ■  0;  yy  <•  9;  ♦♦yy)  { 

If ((boldzCyy]  !•  0)  AA  (holdyCyy]  ••0)) 
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{  -  - 

■oimi  ■  ((flMtXztwbs]  -  teldzCyrl)):  -'- 
DotaS  ■  ( (float) (ftar[zs]  -  heldytTy])); 
holdor  ■  •qrtCCdoubloXCaoxBl  •  ooxal)  *  (oeiaa  •  Mta3>)); 
if(holdor  <  dlat)  dlot  ■  heldor; 

> 

lf((>tarC>s)  I*  0)  dd  (ytorCu]  >■  0)  dd  (dlot  <■  IS.O))  { 
fprlBtf(fpd.  "  Xd.Xd  *.  starDcx],  ytarCss]): 

> 

fpri*tf(fp8.  -\a"); 

ffliiah(f|»3) ; 
fflnah(fp6): 
fflaah(fp7>i 
ffloohdpd) : 

for  (xs  oO;  zz  <■  9:  **  zz)  < 
holdzCzz)  ■  ztorCzzj; 
doldjCzz]  ■  ptorCzz]; 

}  - 


} 

count  ■  count  *  1; 

aucp  ■  roaoaaC/top/troc/proTlouo.acoo*'',  ‘‘/tap/trac/old.ocMo'*); 
if  (au^)"0) 

( 

prlatf("Fila  raaaala(  oparatlen  93  failodlNn**); 
azit(l); 

> 

s«^*raaaM(”/tap/trac/eurr«at_aeaa«*',  "/tnp/tzac/prorieuo.acano*') ; 
If (aoaploO) 

< 

prlntf  CFlla  ronanlag  operation  M  failed  !\b''>; 
ezlt(l); 

) 

otrep7(dlapl.flla,  plotnane); 

oprlntf  (tenl,  "Tl.XdXdXd" ,  dlfltl,  digits,  dlglt3); 
etrcat(dlapl.flla,  teml); 
strcp7(aaTelng,  "cp  /tap/trae/oub.tei^}  ”); 
eprlntf  (temS,  "X*".  dlopl.file); 
otrcat(oBTelng,  temS); 

B7<te«(aBTeli>g) ; 

if(iize!«'X') 

{ 

atrcp7(dlepl_flle,  plotnane); 

aprlatf(texml,  "Sl.XdXdXd" ,  dlgltl,  digits,  digital; 
etreat (dlopl.file,  teml); 

Btrcp7(aaTeii^,  "cp  /ta^/trac/eub.ecenel"); 
oprintf (tem3,  "  Xa",  diapl.fllo); 
atrcat(aaTelng,  tem3}; 
e7Bten(Baeeing) ; 

> 


digits  ■  digits  *  1; 
if  (digits— 10) 

{ 

digits  -  0; 


137 


digits  ■  digits  ♦  1;  . 

> 

lt(dlglts»10) 

{ 

digits  -  0; 

digit 1  ■  1; 

> 

/• - — - - - -•/ 

/•  S«t  flag  to  trlggar  ths  dlaplay  of  tha  •/ 

/a  carralater'a  optla&i  Man.  •/ 

/, - •/ 

If  (eycXaB^l 

i 

lf((fpl  ■  f epaa("/tap/trac/atart3_flag*' ,  '^r”))a>IULL> 

prlatf  C'Errer  epaalag  /tiQ>/trac/atartS.flagl\a"): 
azlt(l): 

> 

fpute(ea,  fpl); 
f eloaa(fpl) ; 
eycla  ■  cpcla  *  1; 

) 

lf((lpS  •  topaa(*'/ta9/trae/optloa.flag‘'.  “r">)«IUU.) 

< 

prlatf  ("Error  epanlag  /tap/trae/aptieii.flag!\ii") ; 
azlt(i); 

> 

ept.flag  ■  fgate(fp3)i 
f  eloaadpS) ; 

/•  Raaat  ept.flag  and  dataralaa  the  option  aalaetad.  •/ 

/. - ,/ 

if  (ept.f  lag»oa) 

< 

lf((fp4  ■  fopaB("/tBp/trac/optlen.flag",  "*"))aaroLL> 

< 

prlatf ("Error  opaalag  /tap/trae/optlon_flag!\n") ; 
azlt(l>i 

> 

fpvte(off,  fp4); 
f eleaa(tp4> ; 

lf((fp6  ■  fopoB("/tBp/trac/eptlon.info”,  "r")>a»fULL) 

< 

prlatf ("Error  opaalag  /tBp/trae/optlon.lafo!\a”) ; 
azit(l) ; 

} 

opt  a  tgatc(fp6); 

/, - - - ,/ 

/*  Aaaotata  chaaga  la  blaarlzatloa  factor.  */ 

/, - ,/ 

if (optaa't') 

< 

fgata(atrlag,  1S8.  fpB) ; 
fgats(atrlag,  13S,  fpS) ; 
factor  a  atef (atrlng) ; 

If (targ.auB ! ao) 

< 

fprintf (fp3."a«aaaaaaaaaaaaaa*aaa»«  Cban”) ; 
fprlBtf (fp3,”gaa  la  blaarlzatloa  tbraabold"); 
fpriatf  (fp3  .  Ian  tbraabold  factor;  ; 


138 


fpristfCfpS.*  X4  factor) 

> 

} 

fcloao(fpE) i 

> 

- — - - - ,/ 

/•  Aaaetata  chaiif*  la  ta^plato  and  scaaa  alaaa.  •/ 

/. - ,/ 

if(opt»'l*  II  opt—*B'  II  optM'a') 

iKopt— 1') 

< 

also  ■  *1* : 

y.taapXatal.alaa  >40; 
x_taaplatal.tlaa  ■  M; 

T.aeaBol.alao  ■  130; 
a.aeaaal.ala*  ■  103; 
pa4.alaa  -  364; 

If (tarf.aua!>0) 

i 

f  prlatf (fp3 ,"•>••••••••••••••••••••  Chaaf") ; 

fprlatf  (fp3,"a  la  wladeo  aix*.  loo  >lado«  *'); 
f prlatf (fpSi^alsa  la:  Larga  iTumplKf"6Ax"') ; 
f prlatf (lp3. “40.  SeaB#-103xl30) 
fprlatf (f p3 , ; 

> 

> 

If  (opt»*a’) 

{ 

aixa  ■  'a'; 
f.taaqplatal.alxa  *  30; 

x. toMplatal.alxa  ■  30; 

y. acaaal.alaa  ■  34; 
x.acaaal.aiza  ■  60; 
pad.alzo  >  64; 

If  (targ.Bw!>0) 

i 

fprlatf  (fp3,  "••••••••••••••••••••••••  Chaag"); 

fprlatf (fp3," a  la  aladoa  alza.  la*  *lndo*  "); 
fprlatf (fp3,“*lza  la:  Saall  (Taaplat*>30z") ; 
fprlatf (fp3, ”30,  Sc*a*>60z38) 
fprlatf (f p3 ,"**>**a***>***a>a*\a\n”) ; 

} 

} 

If  (opt»’B’) 

< 

alza  ■  'a' ; 

J.taarplatal.ilza  ■  38; 

x. taaplatal.alza  >  43; 

y. acaaal.alza  >  73; 

X.aeaaal.alza  ■  116; 
pad_alza  ■  138; 

If  (targ_aai!>0) 

{ 

fprlatf (fp3, "**••*•***•****•*••••«»•  Chang”) ; 

fprlatf (fp3 , ”a  la  vlado*  alza.  lav  vlado*  ”); 
fprlatf (fp3, “alza  la;  Nadlua  (TaaplataMSz”) ; 
f prlatf {fp3. "38,  Sc*a*>nex73)  ••••••••••»”); 

fprlatf (f p3 ; 

) 
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lf(*pt  •••»•> 

< 

•lx*  -  *•'; 

y. taaflktal.als*  ■  20; 

z. tM9lxt«l.iic*  ■  30; 

y. xcaaat.sls*  ■  M; 

z. xcaAcl.alza  ■  60; 
pad.aix*  ■  64; 

If  (z>rg^iail"0) 

{ 

(fpS  I  *•••■•••••••••••••••••••  Ckaaf ") ; 

fprlxtf  (fpS.**  la  alado*  alsa.  laa  aiadea  **); 
fprlatf (fp3,''alxa  la:  Idapt/SMll  (Taa^lataa”) ; 
fpriatfCfpS." Adapt,  SeaaaadOzM)  aaaaaaaaaaa"); 
f prlatf  <lp3 , "aaaaaaaaaaaaaaaaVa^B") ; 

> 

> 

lf(opt—‘f) 

{ 

■laa  -  'f*; 

y. taaiplatal.alza  ■  20; 

z. taaplatal.alxa  ■  SO; 
p.aeaaal.ala#  >  320; 
z.acaaal.alza  ■  469; 
pad.alaa  ■  612; 

if  (tar6.Btaa|aO) 

{ 

f prlatf  (f p3 ,  “aaaaaaaaaaaaaaaaaaaaaaa  Ckanf  ■*)  ; 
fprlatf (fp3,''a  la  aladoa  alxa.  laa  aladea  "); 
f prlatf (fp3,”tlza  la:  Adapt/Full  (Taaplata"") ; 
fprlatf (fp3, "Adapt,  SeaaaMIOxSSO) 
fprlatf (f p3 , "aaaaaaaaaaaaaaaa\B\B" ) ; 

) 


/•—. - •/ 

/•  lalaltlallza  tba  KBOROS  coaaaad*  to  •/ 
/■  aztract  tha  taaplata  aad  acaaa.  ■/ 
/. - ,/ 


z.taaplatal  ■  z.coord  -  (z.taaplatal.alza  /  2); 

y. taaqtlatal  ■  j.coord  -  (y.taa^latal.slza  /  2}; 

z. acaaal  ■  z.coord  -  (z.acaaal.alza  /  2); 
y.acaaal  ■  j.coord  ~  (j.acaaal.alza  /  2); 


atrcpj(aztr.al, 
atrcatCaxtr.al, 
aprlatf (atrlag, 
atrcat(aztr.al, 
aprlatf (atrlag, 
atrcatCaxtr.al, 
aprlatf (atrlag, 
atrcatCaxtr.al, 
aprlatf  (  atr  la|[ , 
atrcatCaxtr.al, 


"▼attract  -1  /tap/trac/acaoal.pad.tzS  ") ; 
"~o  /taip/trac/aub.aca&ai  "} ; 

"•z  Xd  ",  z.acaaal); 
atrlaf) ; 

""j  Xd  ",  j.Bcanal): 
atrlng) ; 

Xd  ",  z.acaaal.alza); 
atrlBf) ; 

"-h  Xd",  J.acaaal.alza); 
atrlag) ; 


atrcpjCaxtr.tl, 
atreatCaztr.tl, 
aprlatf (atr lag, 
atreatCaztr.tl , 
aprlatf (atr lag, 
atreatCaztr.tl, 
aprlatf (atrlag, 


"▼attract  '1  /tap/trac/taBpl.pad.4z8  "); 
"-C  /t^/trae/aub.taaq>l  "); 

"-Z  Xd  ",  z.taaiplatal) : 
atrlag) ; 

"-J  Xd  ",  j.taaplatal); 
atrlag) ; 

"-a  Xd  ",  z.taaiplatal.alza) ; 
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•treat  (MTtr.tl,  atriBg); 

•prlatf (■trls(,  "-h  Xd",  j.taaplatal.alsa) ; 

■treat (•rtr.tl,  atrlBc); 

> 

- - - 

/•  Aaaotata  chaa^a  la  blaarlaatiea  taebaiqaa.  •/ 

- - - 

lf(oi>t~'*’) 

bla_*tata  ■  'a'; 
opt  •  *t*; 

It  (tar^aiBil  >0) 

{ 

tprlatt(fpS."»»»»*«*»»»»»»»»»»»«»»»»«»"»  Cbaaf*  la">i 
tprlatf (tpS.”  biaariaatiOB  aatbed.  Iba  aa«  aatbed  li:"); 
tpriatt  (tp3 .  *  Liaa-bp-llaa  Avaraca. 
fprlatf (fp3,"aaaaaaaa»aaa\a\B"); 

> 


if (opt"«*b') 

{ 

bla_*tata  ■  'b‘; 
opt  ■  ‘t* : 

If (tar£.aua!B0) 

< 

fpriatf (fp3,"»aaaaaaaaaaaaaaaaaaa«aaaaaaaa»»a.  Cbaaca”) ; 

fpriatf  (fp3,"  la  blaarlcatioa  aatbod.  Tba  aaa  aathod  *'>; 
fprlatf(fp3,’'la:  Scaaa  Atarafa.  aaaaaaaaaaaaaaaaaaaaa") ; 
fpriatf  <fp3 , "aaaaaaaaaaaaXaXa") ; 

> 

) 

ifCopt— 'e') 

{ 

bia.atata  >  ’e'; 
opt  •  ’f; 
if  (tar(.aua.'>0) 

< 

fpriatf <fp3, “•••••••••••••••••••••••••••••••  Chaaga"); 

fpriatf (fpS,"  ia  blaarlzation  aatbod.  Tba  aaa  aatbod  ; 
fpriatf (fp3, “is:  Cliaa  Biaarization.  aaaaaaaaaaaaaaa*") ; 
fpriatf (fp3,"aaa»aaaaaaaaaa\B\B"): 

} 


/, - - - ,/ 

/•  If  laat  iaaga  ia  aariaa  baa  baan  diaplayad  or  par  •/ 
/•  uaar'a  raquaat,  kill  baekgrouad  joba  and  azlt.  •/ 

/, - - - ,/ 

lf(opt»"’a’  II  (arge-couat>»l) 

{ 

BtrcppCaaarcb,  "pa  -auz  I  grap  putiaaga  I  grap  -r"); 
atreatCaaareb,  ”  'grap'  >  /tap/trac/ job.auabara") : 
ajataaCaaarcb) ; 

if((fpl  •  fopaa("/tarp/trae/Job.ouabara“,  "r'‘))*»IW.l) 

< 

pr latf ( "Error  opaalag  /tBp/trac/job.B<abart!\D"} ; 

azlt(l)  ; 

> 

forCiai;  i<4; 

< 

fgata(atriag,  138,  fpl>; 
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fer(B^:  ■<6;  PI.t»1b«Cb]  ■  striaftB  4 

p«.v4l««U  ■  '\0': 

if(lMl)  jobl  ■  atoKpi.TklB*): 

lf(i**3>  Jeb3  ■  atel (pa.valua) : 

lf(lB*3>  Jobs  ■  ateKpa.Baltt*); 

> 

telea«(tpl>; 

•prlBtt(k.di«pl.<eT,  "kill  Xd",  jebl); 
•priatf(k.di*pl.«i.  "kill  Xd".  job3>: 
•prlatf(k.dlspl.tl.  "kill  Xd",  jeba); 
■p«tM(k.dlapl_f  ev) ; 

■p«tMi(k.di>pl.al> : 

•pat«i(k.diapl.tl> ; 

if((fp3  ■  f ep«B("/t^/trac/EOS.f lag" .  "«"})m>DU.) 

< 

priatf  ("Irror  opaalag  /t^/«rae/ZOS.flagl\a">: 
axia(l) ; 

> 

fpute(ea,  f p3) ; 
f eleaa(fp3) ; 

if (tarf.BUBl'O) 

{ 

fcloaa(fp3) ; 
tcloaa(fp6) ; 
fclOaa(fp7>; 

> 

priatf("Xe\ii",  ’SOOT); 

ppiBtf  ("/• - - - — - — - ") : 

prlatf  •/\s") ; 

priatf("/4  Thia  pregraa  baa  baaa  taniaatad  aitbar"}; 
prlBtfC"  ia  ra-  a/\a")j 

priatfC"/a  poaaa  te  tba  uaar’t  raquaat  or  bacauaa  ">; 
priatfCtba  di-  a/\B«)j 

priatf("/a  gitlzad  iaagat  for  this  aaquaaca  bava  b"); 
priatf("aas  ax-  a/\n"); 

priatfC"/*  hauatad.  If  tba  prograa  'trac.aaau'  baa”>; 
priatf("  aet  a/\B") ; 

priatfC’/a  alraady  baaa  xataiaatad,  plaaaa  rapoaaa"); 
priatfC  with  aAa"); 

priatf("/a  optioa  ’a'  to  taradaata  it  ao«.  "); 

priatf<-  aAa"); 

priatf  - — — - - - ..n) . 

priatf(" - a/V*"): 

axitCO); 


- - - 

/a  Raaat  rarlablaa  aad  kill  background  procaaaaa  •/ 
/a  to  aaabla  tba  uaar  to  aalact  a  aaa  targat.  a/ 

- - - 

if  (optaa'aO 

< 

ejcla  a  0; 
atata  ■  ’r’ ; 
paat  a  1; 
tiaaa  >  O; 
iadaz  a  0; 
run  a  0; 
opt  a  • a ’ ; 
factor  a  O.IS; 
bla.atata  •  ’b’ ; 
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< 

f cle««(fpS} ; 
felet0(tpt) : 
f  clesadpT) ; 


> 

•trcprCiaarch,  “p«  -aux  I  grap  /t^>/trac/Tl.dl  I  grap  ">; 
■treat (aaareh,  "patiaaga  >  /ti7/trac/jeb.aiiabara*) ; 
■jatMCaaareh) ; 

if((fp4  ■  fopaa("/t]ip/trac/Job.a«»bara",  “r")>««roii) 

■c 

prlatf  ("Error  opaalag  /tap/trac/Job_Baibaral\a''>: 
asltd); 

> 

(gataCstrtag,  laa,  f p4> : 

far(o>0;  m<B;  m**)  pa.valoaU  ■  atriagCa  *  •]; 
pi.valuaM  ■  *\0'; 
jebl  B  atoKpi.ralua); 
f eleaa(tp4) ; 

■treppCaaarcb,  "pa  -auz  I  grap  /tap/trac/Sl.dlt  I  grap  ">; 
■treat (aaareh,  "putlaaga  >  /tBp/trac/job.Buabara") ; 
■7ataa(saarch) ; 

lf((fp6  ■  lopaa("/t«p/trae/jobj»»bara“,  "r“))B“IUIX> 

( 

priatf  ("Error  opaalag  /ti^/trae/Job.a«bara!\B“); 
axlt(l> ; 

} 

<gata(*triag,  128,  lpS>: 

fer(BBO;  B<8i  b«*)  pa.TaluaCa]  ■  atrlagtB  *  6}; 
pa.Taltta[B]  ■  '\0‘; 

Jeb2  ■  atoi(pi.ralua>; 
leloaa(fpS) ; 

■priatf (k.diapl.tl,  "kill  Sd",  Jobl); 

■priatf (k.diapl.sl,  "kill  Xd".  job2>; 

■7StaB(k.diapi_tl) ; 

.  ■7staB(k.diapl.sl) ; 

> 

} 

> 

> 


/. - ,/ 

/•  Fuactloa:  liaa.bia  Tbl>  fuaetloa  parfoiM  •/ 
/•  llaa-b7*liaa  blaarizatieo  of  aa  iaaga.  •/ 
/. - ,/ 


void  liaa.bladaflla,  outflla,  factor,  uppar,  loaar) 
char  iBfila[128],  oatf lla[l2B]  ; 
lat  uppar,  loaar; 
float  factor; 

{ 

FILE  Bfpl,  •fp2; 

lat  total  ■  0,  1,  B,  Bar  •  0; 

lot  BUB.arra7[8] ,  aalua,  r,  k,  anabar; 

char  taaip,  tant2C25]  ,  ■triagCl26],  to.ascllCl28}; 

char  to.Tiff [126] ,  to.b7ta[l28] ; 

float  aaaraga; 


/, - •/ 

/*  JaitlaliZB  KBOKOS  •ub-routioa  coBaaad  atrlnga.  •/ 

/, - ./ 

■priatf (atriag,  "aprdata  *1  Xt  ",  lafila) ; 
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■trcpjrCto.MCll,  strlBc): 

■treat (te.Mcll,  "-f  /tap/trac/liaa.bla.lBdata  -■  O'*); 

•treppCte.Tltt,  "ucTrlff  -1  /tap/trae/liB».biA.e«tdata  ■«  ">; 
■treat  (te.Tlft,  "/tBp/trae/llBa.blA.arlff  -tl  0  -t  0  ">; 

■treat (to. riff,  "^r  330  -e  4M  1  -a  }  "b  i  -4  0  “b  0  ■>■  0*) 

■jataB(to.aaell) : 


lf((tpl  ■  fepaBC/tap/trae/llBa.bla.ladata’'.  ■*r''))MaoUi) 

prlBtf  CErrer  epaalaf  /ta^/trae/ltBa.bla.iadatafXB"): 
axlt(l): 


if((fp3  ■  fepaBC/tap/trac/Xlaa.blB.enMata”. 

{ 

prlBtf( "Error  vrltlof  to  /ti9/trac/liaa.blB.eutdata!\B”>; 
■xlt(l) ; 


tor(k"0;  k<13j  k**)  fgataCatrlas,  138,  Ipl); 
fer(k-0;  k<330;  k**) 

{ 

/, - 

/•  Araraca  tba  flrat  8  plzalt  of  a  llna.  •/ 

/, - - - 

*or(r"0:  r<8j 

< 

1  •  0! 

lf((fgats(«triB(,  138,  fpl>)aa|IUU.) 

< 

prlatf ("Error  raadlaf  froa  /tap/trac/lB.taat.dataiXa"); 
orit(l) ; 

} 

tai^>  ■  atrlBg[l] ; 

■blloCtaap'a'a') 

{ 

1  ■  1  ♦  1; 
taap  a  atrlagCl] ; 

} 

1  -  1  ♦  1: 

B  •  0; 

taap  -  atriB*tl]  ; 

whilaCtaap! a’ \s ’ ) 

{ 

tarmSCa]  a  taap; 

Basal; 

1  a  1  ♦  1; 
taap  a  atriagCl]  ; 

> 

taraSLa]  a  >\e> ; 
aalua  a  atoKtaraS); 
nua.arrajtxD  •  ralua; 
total  a  total  *  Talua; 

if (vpparaai) 

{ 

tprlatf(fp3,  "Xd\B",  nppar) ; 

> 

alaa 

{ 

fprlDtfCfpS,  "Xd\B",  talua); 
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> 

if((Talu«  '  MZ)>0)  MX  -  Vklna; 

}  .  . 

/. - - - ./ 

/•  Biaarlx*  Mcb  plxal  b«a*  M  tba  •/ 

/•  of  tba  prarieiu  8  plxal*.  a/ 

- - -  ... 

<er(raOi  r<48ls  r**) 

lf((f(ats(atriac.  138.  tpl)>a-mnx) 

< 

prlBtf  ("Error  raadiaf  lre«  /tap/trac/la.taat.datal\B"> 
axixCl) !  '  *it  ■■  f  •  - 

> 

1-0; 

«aq»  a  atriacCl]  i 
vhUa(taiipl-'-‘) 

{ 

1  ■  1  ♦  i: 
taap  a  atrlafCll; 

> 

1  a  1  ♦  1; 

■  a  0; 

taup  a  ttrlagCl]; 

•hila (taapi a ’ \b ' ) 

( 

tazoSCM]  a  taap; 

B  a  •  4  1; 

1  a  1  4  Ij 

taap  a  atrlagCl]; 

} 

«an3ClC  a  '\0’; 
ralna  a  atel(tax>2); 

aaaraga  a  ((float)  total)  /  8.0; 
avaraga  a  (araraga  a  factor)  ■*  aaaraja; 

If (((float)  Talua  -  aToraga)>0) 

< 

Biuibar  a  uppar; 

> 

alia 

( 

BUBbar  a  loaar; 

> 

fprlBtf(fp2,  "Xd\B",  BOBbar); 

total  a  0; 
for(BaO;  b<7;  b44) 

( 

BUB_arrayCB}  a  auB.arrayb  *  l] : 
total  a  total  4  BUB.arrajCa] ; 

> 

total  a  total  *  aalua; 

} 

> 

fcloaa(fpl) ; 
f cloaa(fp3) ; 

apataaCte.rlff ) ; 

lf((uppar  '  Baz)>0)  Bax  a  uppar; 

if (upparaai) 
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< 

MX  ■  1; 

) 

ttrcpyCte.bjta,  *TC®nT«rt  -i  /tap/trkc/IiB«.blA_aTlf<  -•  "> 
•prlstf(*trlag,  "X*  -n  id",  eatflla,  mx): 

•treat (te.bjt*,  BtriBs); 

•treat (to .byte,  "  -t  byta  -b  0")i 

•yetaaCte.byta) ; 
rataxa; 

> 
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B.3  COR.C 


/•  COR.C  •/ 

/•  _  •/ 

/•  AIR  FORCE  xnrrnnx  or  ticdoloot  •/ 

/•  TRACKS  TAROET  OSISO  TIE  TICHIIQOE  OF  AOAFTm  CORREUTXOI  •/ 
/•  bj  Caft  D«Dala  A.  Heatara  •/ 

/a  Oetobar  IS,  Itsa  •/ 

/•  •/ 


/•  Tbla  prosraa  azacataa  tba  eorralatleB  pluta  Featprocaaal^  •/ 
/•  alforltbB  ex«ata4  Auriaf  my  tbaala  aa  ladlalAaal  pieraraa.  •/ 
/•  Thla  prograa  4aaa  Mt  coodnct  tha  aetaal  CMTalatlea  or  •/ 
/•  taaplata  aatoeotralatlao.  Tbit  prograo  oalp  coadnets  tba  •/ 
/•  eorralatloB  paak  balfbt/ahapa  aateblac. 

/•aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaMasaaaaaaaa/ 


•iacluAa  <stdlo.h> 

•laeluda  <stria(.b> 

•iaelvda  <Batb.b> 

aalaO 

< 

/a - - - — - — - a/ 

/•  Oaflaa  profraa  variablaa  aad  a/ 

/•  eback  for  lapat  diroetery  patb.  •/ 

/, - a/ 

nU  afpl; 

cbar  patbCl38],  taralCES],  tapathCiSS],  atrlbg[12B3,  aklp; 
lat  i  a  0,  xz,  yy,  ta^z,  tapj,  ceoBt,  zcaa,  ycaa,  czz,  eyy: 
lat  fact,  tzz,  tyy; 

float  eortai^CT]  [7]  •  sent,  cordataCl3S}  [138] ,  boldarS; 
float  aerae,  aeral,  aera2,  aoraS; 
deobla  pareaat,  boldar; 


/• - - - - - — — - — - -a/ 

/•  Dataralaa  vbieh  so^aaea  to  dtaplaj  a/ 

/».... - — - - - - - -•/ 

prlatf  ("Eatar  path  to  ba  tuod  Xa*}; 
for(laO;(sklp>gatebar()}  t*  ’\a’; 
t^9atb[i]  a  aklp; 

> 

tapathCi]  a  '\0’; 

atrep7(path,  tapatb); 
apriatf (taxal,  ".taa.dat"); 
ttrcatCpath,  tonal); 


if((fpl  a  fopaa(patb.  ar'*})aaSULL) 

< 

prlatf ("Error  opaalac  XalXa",  path); 
azlt(l) ; 

> 

fgataCatrlac,  128,  fpl) ; 
aorat  a  O; 

for  (yy  a  0;  77  <a  6;  **77)  { 
for  (zz  a  0;  zz  <a  6;  **zz)  { 
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if((tacaBf«pl,  "Xf*.  keertai9Lsz3Cnl))**IDU.> 

< 

prlatf ("Error  roadlaf  <r««  Xal\B"t  path); 

•zltd) ; 

> 

Donrt  ■  Boiat  *  (certMipCzx]  [77}  *  cort«i^Da3[773); 

> 

(•eaBf((pl,  "X*>*)i 

> 

feloooCtpl): 

•tx«p7(path,  ta^atli}: 

■prlatf(t«XBli  ".ac.Aat"): 

•treat(path.  i 


if((tpl  ■  (epanCpath,  "r"))“*Itni) 

< 

priB«t("lrrer  epaalaf  XbIXb",  path); 
axlt(l): 

} 

fgati(Btria(,  138,  fpl) ; 
lor  (77  ■  0:  77  ^27;  ""77)  { 

lor  (xz  ■  0;  XX  <•  127;  ♦♦xx)  < 

iKdacaaf dpi,  "XI*.  *eordata[xx] [773)>""inJU,) 

< 

prlBtl ("Error  roadlag  Iroa  Xb!\b".  path); 
axlt(l) ; 

> 

> 

laeanldpl,  "X*«’); 

> 

lelesadpl); 


tapz  ■  0; 
tapy  ■  0; 
pareaat  ■  100.00; 
lor  (xx  ■  0;  XX  <•  120;  ""xx)  { 
lor  (yy  •  0;  yy  <•  120;  ♦♦yy)  ( 
holdar  0.00; 
holdor3  ■  0.00; 
cowBt  ■  0; 

Bozoe  ■  0.00; 
xeoB  ■  XX  *  3; 
yean  ■  yy  ♦  3; 

iKcordataLxcan]  [yean]  >  (coTtanpC3]  [3]  •  0.35)) 

{ 


lor  (exx  •  0;  exx  <■  6;  ♦♦exx)  { 
lor  (eyy  •  0;  cyy  <•  6;  ""eyy)  ( 
tzx  >  czz  *  zx; 

*77  ■  eyy  ♦  77: 

Bone  >  none  *  (eordataCtxx]  [tyy]  •  eordataCtxz]  [tyy]  ) ; 
nonl  ■  eordata[tzx]  [tyy]  ; 
non2  ■  eortanptezx]  [cyy]  ; 

BonS  a  cortanp[3]  [3]  ; 
laet  ■  1; 

il(exx«a3)  laet  •  laet  •  8; 
il((exx"a2)  II  (exx"“4))  laet  •  laet  •  4; 
ll((exxaal)  II  (eix""6))  laet  •  laet  •  2; 


/ 

N*' 
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If(e77~»  f»et  ■  fkct  •  •; 
if((eyy^)  II  (eyy-^))  <»et  ■  fMt  *4; 
lf(<ey7"l>  II  (ejj^B))  f*«t  •  f«et  •  3; 
lf((czx*"3)  44  (ctjmS))  (ftct  ■  f«ct  •  T; 

hel4«r3  ■  kaldar3  *  (((flMtXaet)  •  ((soiml  *  boibS)  •  (aonl  •  MmS))): 

> 

> 

boldar  ■  C(sqrt((4aubl«)hel4«r3))  /  ((4eiakl*>MSB3>}: 

lf((eMntnO}  44  (heldar  <  p«rc«at)) 

< 

taps  "  XX  *  3; 
fiPT  •  IT  •»  *5 
parcaat  ■  holdar; 

} 


> 


> 

> 

prlatfCXa  1*  lecatad  at  Id. Id  Xb",  tapath.  taps,  tapy); 


> 
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